http://qs321.pair.com?node_id=503783

JFarr has asked for the wisdom of the Perl Monks concerning the following question:

All mighty monks, Young prophet beeseaches you wisdom on all PERL :). I need to write a perl script that is multi-threaded. Not a problem. But withing these threads/subs I need to pull out a $var and a @array. Everything I have tried seems to fail, including createing a 'my var' at the top of the file. I've even went so far as to try and return a value from the threaded subroutine. Any help is greatly appreciated. example: $thr1 = new Thread \&mysub; ... sub mysub { ... $ddb = someting;# I need this returned to the main # routine so I can pass it to another #sub. ... } Similar situation for the array. Thanks in advance.