このコードを使用すると、このエラーが発生します
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ではなく、このことについて学ぶのに適した場所です。