【Perl 】初心者コーナーPart5

>>948
そいつはちょいと複雑だな
%pair = (0 => [0, 1, 2, 3]);
$value = (@pair{(0)})[0]->[3];
print "$value\n";

尤も俺ならもっと単純な方法を取るがね。
$value = $pair{0}[3];
print "$value\n";