Re^2: non-scalar hash key

[tweetiepooh]

Nice but not in the gold

use strict;
use warnings;
use Benchmark qw(:all) ;

my @foo = qw/1 2 3 4 5 6/;
my %bar = (pack('b', @foo) => 'elephants');

my @baz = qw/1 a 4 6 7/;

print $bar{pack('b', @baz)} . "\n";

Also outputs "elephants".

[Arunbear]

True, and it is fixed by the "L*" template mentioned in Re^2: non-scalar hash key