Help for this page

Select Code to Download

Select or download this

use threads;
$thr = threads->new(\&sub1);
sub sub1 {
print "In the thread\n";
}