無限ループを作る [Perl]

サンプル

#/usr/bin/perl
while(1) {
    #ToDo
}

解説

while(){...}は、()の中が真の間ループを繰り返します。
0が偽で1が真ですから、while(1)で、常に真と判定されます。

※0は偽ですが、真が1かどうかは言語や実装によって異なります。
いずれにしても0でない=真、ですから無限ループになります。