Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/env perl

...
    $c++;
    sleep(1);
}
  2. or download this
    #!/usr/bin/env perl

...
    say 'GOT: '.$line;
    last if $line =~ m/^FINISHED/;
}
  3. or download this
    #!/usr/bin/env perl

...
    chomp $in;
    say 'STDOUT: '.$in;
}