my %args; @args{qw(draw gc text x y w h)} = @_;