とあるエンジニアの闇歴史帳

この文書は読取専用です。文書のソースを閲覧することは可能ですが、変更はできません。もし変更したい場合は管理者に連絡してください。

====== リストからある条件と一致した値を取出す - Perl ======
~~socialite~~
<note important>この記事は数年以上前に書かれたものです。</note>

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

===== サンプル =====
<code perl>
;#
;# リストからある条件と一致した値を取出す
;#

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

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

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

===== 実行結果 =====
<code>
apple
pineapple
</code>

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

===== 関連書籍 =====
{{amazon>jp:4873113148}}
<html><p style="clear:both"></p></html>

{{amazon>jp:4798139815}}
<html><p style="clear:both"></p></html>

{{tag>CGI・Perl例文集 Perl 配列 リスト grep}}
~~socialite~~

とあるエンジニアの闇歴史帳

ユーザ用ツール

関連ページ

ページ用ツール