作り方は無限ループにPerl

う方法にはいくつかの種類があり方を作成することができます無限ループにPerlです。

利用 while

最初の方法をを作成することができます無限ループを使用 サイクル while. このループが実行されるまでを表示します。 として 表現の書簡単な定数がtrueの場合 ループの動作の無限. この例のコード:

#!/usr/bin/perl

while (1) {
    # some code
}

合成することを目的としていますこのサイクル、そのループに必要なものを last. 次に例を示します。

▶ Run
#!/usr/bin/perl

my $i = 0;
while (1) {
    print $i;
    last if $i > 2;
    $i++;
}

りますので注意して出口よりループをキーワードを使用 lastreturn、 な break.

利用 for

こちらの書き方は無限ループは、Perlプログラミング言語cを用い for:

#!/usr/bin/perl

for (;;) {
    # some code
}

for 3内のコードスニペット:

  • の初期値
  • チェック
  • 変化

通常のボディにループが行われた場合この試験はtrueを返します。 がチェックをオンにした場合、足りないものがありましたら、 この特定のケースでは、無限ループを実行します。

終了この無限ループを使用する必要があり last:

▶ Run
#!/usr/bin/perl

for (my $i = 0;;$i++) {
    print "$i";
    last if $i > 2;
}

利用 until

ここに別の方法を作成することができる無限ループにPerl:

#!/usr/bin/perl

do {
    # some code
} until(0)

コードブロックを実行するまでの条件 until です。

出すためにはこの無限のサイクルにおいても、必要キーワード last, がで正常に動作に必要なすべてのコードは、無限ループにはブレース:

▶ Run
#!/usr/bin/perl

my $i = 0;

{
    do {
        print $i;
        last if $i > 2;
        $i++;
    } until(0)
}

ここでは一例ですがまた利用しようと lastではなく、同封のコードブラケット:

▶ Run
#!/usr/bin/perl

my $i = 0;

do {
    print $i;
    last if $i > 2;
    $i++;
} until(0)

行った場合、このコードでエラー:

Can't "last" outside a loop block at script.pl line 7.
0123

関連する話題

その他の記事