人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

perlでの正規表現を教えてください。

$pict_regex = マッチパターン;

@hoge_list = (”hogehgoe.exe”, ”0001.jpg”, ”///”, ”0001.gif”, ”0001.png”, ”.”);
@hoge_list = grep(/$pict_regex/, @hoge_list);
print @hoge_list;
__END__

というスクリプトがあります。このとき出力が、
”0001.jpg”, ”0001.gif”, ”0001.png”
となるようなマッチパターンを教えてください。

●質問者: sakuneko
●カテゴリ:コンピュータ 学習・教育
✍キーワード:.jpg exe GIF grep Perl
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● matsu911
●40ポイント

http://www.news-web.org/

ブログ ビジネス インターネット 新聞 ネット at news-web.org

@hoge_list = (”hogehgoe.exe”, ”0001.jpg”, ”///”, ”0001.gif”, ”0001.png”, ”.”);

for(@hoge_list){

local $¥ = ”¥n”;

print if /¥.(jpg|gif|png)$/;

}


こんなかんじですかね?

◎質問者からの返答

回答ありがとうございます。プログラムはこのままで上記の出力が可能になるマッチパターンを探しておりました。ちょっと趣旨の違う回答でしたが、内容は十分理解出来ましたので質問をクローズさせて頂きたいと思います。

ちなみにマッチパターンを

$pict_regex = ”¥.(jpg|gif|png)”;

とする事で上記の出力を得ることが出来ました。

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ