Perl › 関数 › here 「grep関数」を使用すると配列の中で条件にマッチした要素のみを取り出すことができます。デフォルト引数$_に@arrayの各要素が渡されてきます。条件文を満たした要素のみが@matchedに追加されます。 # 条件にマッチした要素のみを取り出す @matched = grep { 条件文 } @array; サンプル 正規表現にマッチした要素のみを取得するサンプルです。このサンプルでは整数だけを取り出しています。@numsが(1.23, 123, 43)の場合は@matchedは(123, 43)になります。 # 正規表現にマッチした要素のみを取得 my @nums = (1.23, 123, 43); my @matched = grep { /^\d+$/ } @nums; 正規表現でパターンマッチ演算子(=~)を省略するとデフォルト変数$_がパターン