Some sugar: properties

my $save = $window-> text;
$window-> text("Another text");

my @size = $window-> size;
$window-> size( 300, 300);
$window-> size([ 300, 300 ]);