[perl]配列の配列 その２ 2008/09/30

Perlです。配列の配列です。
これはリファレンスを使うやり方なのだと思う。

配列リファレンスをでリファレンスするには、リファレンスの前に@をつける。

my $arr = [["0001", "0002", "0003"], "a", "b", "c", "d"];
print "content[@$arr]\n";
print "size[".@$arr."]\n";

#配列にアクセス
print @$arr[2]."\n";

#これはだめ
#print @$arr[0][2]."\n";

#エラーにはならないけど期待した結果ではない...
#print $arr[0][2]."\n";

#これはOK
print @$arr[0]->[2]."\n";