私はperlを初めて使用し、ループを繰り返さずにforeachループ内の配列の次の要素にスキップする際に問題に直面しています。foreach ループを使用して配列を処理する次のケースがあるとします。
foreach (@lines){
...
print "$_"; #print current line
if (cond){ #this condition is met by one "line" in @lines
#goto next line;
$_=~s/expr/substitute_expr/g; #substitute in the next line
}
...
}
perlでこれを行うことは可能ですか?ファイル ハンドラーでは、次のように <> 演算子を使用して可能です。
foreach $line (<FILE>){
print "$line\n"; #print this line
$line = <FILE>;
print "$line"; #print next line
}
これをアレイで複製できる方法はありますか。nextまたは重複配列を使用せず
にこれを行う方法はありますか