my $hr={a=>1,b=>2,c=>3};
printf "geht: %d und %d \n", @{$hr}{qw/a c/};