Select Code to Download

 use strict; use warnings;

...

 $chnl->send("this is something $_") for 1..$size;
 $thrd->join();

 use strict; use warnings;

...

 $chnl->send("this is something $_") for 1..$size; 
 $proc->join();