このコードを使用すると、このエラーが発生します
if($DirEnt == "." || $DirEnt == "..") continue;
if($DirEnt == "default" && $ignore_default) continue;
エラー:-
syntax error at test.pl line 35, near ") continue"
syntax error at test.pl line 38, near ") continue"
そして、それらは次のように行うことができます:
next if $DirEnt =~ /^[.]{1,2}$/;
last if $DirEnt eq 'LastEntry!!';
完全を期すために
redo
。これらはすべてラベルを付けます:
OUTER: while ( <$in1> ) {
...
while ( <$in2> ) {
....
redo OUTER if i_feel_like_it( $_ );
}
}
最後にcontinue
、C/Javaファミリのようには機能しません。に使用されます
case
にが付いているCブロックのようなものです。ただし、スイッチが一致する他のケースbreak
を見つけることができるようにするものを除きます(CやJavaのようにドロップスルーするだけではありません)。 )。continue
これらすべてとさまざまな順列については、を参照してくださいperldoc perlsyn
。perldoc.perl.orgは、Stackoverflowではなく、このことについて学ぶのに適した場所です。