Help for this page
my @a = qw(1 2); my @b = \(@a); ... print "Addresses do not match$/" unless "@b" eq "@c"; __END__ Addresses do not match
${$_}++ for map \(@$_),@{$a};