Help for this page

Select Code to Download


  1. or download this
    sub qxx {
    my( $cmd, @args ) = @_;
...
}
  2. or download this
    #! perl -slw
use strict;
...
$Q->enqueue( (undef) x $THREADS );

$_->join for @workers;
  3. or download this
    c:\test>857569-2 -THREADS=4 -PROCESSES=6 -TIMEOUT=3
  1: Started pid 4724 for 5 seconds
...
'
err:'a warning
'