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

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

サンプル

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

@array = ('apple', 'orange', 'pineapple');

#-- "apple"が含まれる物を表示する --#
@result = grep(/apple/, @array);

#-- 結果表示 --#
foreach(@result){
print ;
print "\n";
}

実行結果

apple
pineapple

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

このブログを応援する

お寄せいただいたお気持ちは全額サーバ代や次の記事を執筆するための原資として活用させていただいております。この記事が参考になった場合などぜひご検討ください。

PayPalで300円支払う
※金額は任意で変更できます。
※100円でも泣いて喜びますw
※住所の入力欄が現れた場合は「no needed」を選択ください
これまでのご協力者さま

- Sponsored Link -