perl > array


※上記の広告は60日以上更新のないWIKIに表示されています。更新することで広告が下部へ移動します。

配列について


配列の作り方

@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。