Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
    
    ...
        sleep 1;
        print "$i\n";
    }
    
  2. or download this
    #!/usr/bin/perl -w
    
    ...
    while ($out = <$pipefh>) {
        print $out;
    }
    
  3. or download this
    #!/usr/bin/perl -w
    
    ...
        sleep 1;
        print "$i\n";
    }