creating multiple threads in perl

Hi gurus,

I need to create "n" mulitple threads simaltaneously  and all the threads
should do same operation(just like Jmeter).


i have a subroutine

sub printname{

                      my ($tid)=@_;

                      print "name is guru tid is $tid\n";

}



all the threads should execute the above subroutine simaltaneoulsy.


Thanks,
siva