リストからある条件と一致した値を取出す - Perl

この記事は数年以上前に書かれたものです。

あるリストから、希望する条件に一致した値だけを取り出したい場合がある。for,while,foreachなどのループを使う方法以外に、効率の良いやり方が知りたい。

サンプル

;#
;# リストからある条件と一致した値を取出す
;#
 
@array = ('apple', 'orange', 'pineapple');
 
#-- "apple"が含まれる物を表示する --#
@result = grep(/apple/, @array);
 
#-- 結果表示 --#
foreach(@result){
print ;
print "\n";
}

実行結果

apple
pineapple

grepは、ブロックを用いることもできる(grep { /apple/ }, @list)。

関連書籍

chromatic, Damian Conw…
ISBN 4873113148
¥ 9,725

Joseph N. Hall, Joshua…
ISBN 4798139815
¥ 4,104

コメント

コメントを入力. Wiki文法が有効です:
A T M G F