my %ha;
$b=[1,2,3];
print "[T1, $b->[0]]";
print $b;
$ha{$b}=3;

foreach $k (keys %ha)
{
    print "[T2, $k->[0], $ha{$k}]";
    print $k;
    print "[T3, $$k[0], $ha{$k}]";
}

不理解，key的元素怎么访问不了？
[T1, 1]ARRAY(0x11ea5e0)[T2, , 3]ARRAY(0x11ea5e0)[T3, , 3]
--
FROM 114.249.63.*