Help for this page
my @foo = qw/1 2 3 4 5 6/; my %bar = ( ... my $zonk = \@foo; print "$bar{$zonk}\n";
elephants