perl/array - kuwa0224kuwa @ ウィキ

配列について

配列の作り方

@name = ("A", "B", "C");
@name = qw/A B C/;
@name = ('A' .. 'C');

ちなみに配列通常のスカラ変数に代入すると、大きさが入る。

$size = @name;
print $size; # print 3

配列の最後のindex文字の返し方

print $#name; # print 2

この値に代入することで、配列のサイズを縮小できる。

$#name = 1 # remove $name[2]

配列スライス

配列の値を使って、ほかの配列を作ることを配列スライスと呼ぶ。

@names = qw/Tom Dick Harry Pete/;
@pal= @names[1..3];

こんな方法もあり。

($friends[0], $friends[1], $friends[2]) = @names;

↑で4とか5を使うと間の要素は未定義となっている。(defined で falseになる)

多重配列

print $m[x][y];

と表す方法以外に、

print $m[x]->[y];

というのもあり。$m->[x]はNG。