Perlについての質問箱 46箱目
■ このスレッドは過去ログ倉庫に格納されています
0070デフォルトの名無しさん
2011/02/18(金) 19:42:39とやると、BEGINが含まれる行からENDが含まれる行がprintされるけど、
BEGINとENDが含まれる行はprintしないようにするエレガントな方法ってある?
何も考えずに書くと、
while (<>) {
if (/BEGIN/../END/) {
next if /BEGIN/;
next if /END/;
print;
}
}
という、だっさいコードになるんだけど。
■ このスレッドは過去ログ倉庫に格納されています