Help for this page

Select Code to Download


  1. or download this
    #! /usr/bin/perl -w

...

print $thread->join() ."\n";
  2. or download this
    #! /usr/bin/perl -w
use strict;
...
close(READ);

print $thread->join() ."\n";