コーディングしたもので遊んでいるときに出てきた一般的な質問があります。die(); 以外に、ユーザーからのフィードバックに基づいてプログラムの特定の部分を終了する方法があるかどうか疑問に思っていました (ここで用語を誤用していたら申し訳ありません)。それはプログラム全体を終了するからです。
コードは次のとおりです。
if ($choice eq 'y'){
print "\nHit diagnostics: \n";
{
my $hitList=@hitList;
for (my $i=0; $i<$hitList; $i++){
print $hitList[$i]."\n";
#segmented listout of misses with interrupt
if(($i%4) eq 0){
print "CONTINUE or Q to end\n";
my $next=<>;
chomp($next);
if(lc($next) eq 'q'){
**die "Killing request...\n";**
}
}
}
}
したがって、基本的には、ユーザーがある時点でリスト全体を実際に表示したくないが、続行できると判断した場合に、モジュラス if ループを終了できるようにしたいだけです (後でミス プロンプトも表示されます)。 ) プログラムで。
変数を「スイッチ」として使用して、ヒットリストを継続するかどうかを決定するためだけにこれを行う最善の方法はありますか? もっと受け入れられる/エレガントな解決策があるかどうか疑問に思っています。