libvenus has asked for the wisdom of the Perl Monks concerning the following question:
Hi Monks,
I m trying to pass threaded queue objects to an accessor of a different class but the threaded queue objects gets undefined in that accessor.
$globalQ : shared = new Thread::Queue; $q = new Thread::Queue; my $regQueryObj = RegSuiteQuery->new(\%allConfig); my @queryworkers = map {threads->new($regQueryObj->queryWorker,$q,$glo +balQ);} 1 .. $maxnoofQueryThreads; $q->enqueue(@allQueryPaths); $q->enqueue( ( undef ) x $maxnoofQueryThreads ); $_->join for @queryworkers; $globalQ->enqueue("FINISH");
Is there something that i m doing wrong ?
Thanks
|
|---|