小编Ste*_*eel的帖子

我是Perl的新手.我在一个while循环中写了一个sleep;这是一个非常简单的代码但是没有用.furstruted ...

use strict;
use warnings;

&main();
sub main()
{
print "hello\n";

while(1)                    # #1
{   
      print "go~  ";
      sleep 2;      
}
}

如果注释掉#1,则打印"go~"; 否则,它只是等待没有任何"去〜"打印.我的目的是定期做一些事情.

任何人都可以给出一些解释/提示吗？