my $str = "@{[keys %h]}";