モメモメモメモ

perl再入門〜慣用句〜

perl

perlには同じアルゴリズムでも異なった様々な記述ができる

個人的にスマートだと思う記述方法は以下の通り

# @arr の要素をすべて足す
foreach (@arr) {
    $sum += $_;
}

# $aと$bの値を交換
($a, $b) = ($b, $a);

# 複数のファイルを標準入力から全行読みソート
print sort <>;

# 「hoge」を含む行を全て表示
print grep /\bhoge\b/, <>;

# @numに含まれる数のうち、５で割り切れる数をすべて@ansにコピーする
@ans = grep {not $_ % 5} @num;

次は、重要な正規表現について勉強していきます！

ツイートする

Permalink | コメント(0) | トラックバック(0) | 00:31