my $foo = (1,2,3); # assigns 3 to $foo #### my %bar = ( a => 'A', b => 'B', c => 'C', d => 'D', ); my $broken_count = @bar{'a', 'b'}; my $working_count = map {$_} @bar{'a', 'b'}; print "broken_count : $broken_count\n"; # B print "working_count: $working_count\n"; # 2