Help for this page

Select Code to Download

Select or download this

#/usr/bin/perl -w

...
    $outqueue->enqueue(undef);
    print "$threadname ended.\n";
}

Select or download this

C:\chas_sandbox>test.pl
LBCJC started.
...


C:\chas_sandbox>