質問: 上記ファイルを読み込んで、「hogehoge」から「perl」の間に挟まれた行だけ抜き出したいのです。 イメージとしては、読み込んだファイルを配列に入れて、一行づつ読ませ、キーワード「hogehoge」が現れたらそこでフラグを立て、それ以降の行を表示し、キーワード「perl」が現れた時点で表示を止めるという処理になるのかな?と思っています。 このような場合、どういう風にすればいいのでしょうか? 恐れ入りますが、ご教授頂ければ幸いです。 それでは、どうぞよろしくお願い致します。
回答: perlな人はもっと略したいでしょうけど素直に書けば。 $flag=0; open(fh, "< ./example.log"); while($data = ){ print "$data\n" if $flag==1; chomp $data; $flag=1 if $data eq "hogehoge"; $flag=0 if $data eq "perl"; } close fh; 参考url:http://www.rfs.jp/sitebuilder/perl/