初めてのPerl 自分メモ3 リストと配列

配列の最後の要素

$array[-1].インデクスが負の値だと最後から数える.

qwショートカット

qw//の中身は空白で区切るリストになる.qw//だけではなくqw!! qw## qw() qw{} qw[] qw<>でもok.

pop, push, shift, unshift

  • pop 配列の最後を取り出す
  • push 配列の最後に追加
  • shift 配列の最初を取り出す
  • unshift 配列の最初に追加

foreach

制御変数のデフォルトは$_


foreach $num (1..10) {
print "$num\n";
}

foreach (1..10) {
print "$_\n";
}

このふたつはいっしょ.

reverse

リストを逆順に並べる.引数の値は変更されない.


@nums = 1..10;
reverse @nums; #代入しなければ意味はない
@nums = reverse @nums; #count down!

sort

云うまでもなく.

リストの初期化

@array = {};

リストの数


@nums = 1..10;
$num = @nums;
print "$num\n";
print scalar @nums, "\n";
scalar疑似関数を使えばリストを強制的にスカラとして扱う.