Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number

Re^2: perl threads exiting abnormally

by Lotus1 (Curate)
on Nov 23, 2012 at 15:21 UTC ( #1005280=note: print w/replies, xml ) Need Help??

in reply to Re: perl threads exiting abnormally
in thread perl threads exiting abnormally

  • Why did you put a 'do' block inside a while loop? The while loop is going to do the block inside it anyway.

  • $workq->end();
    I couldn't replicate your error.

    There is no end() method listed in the POD for Thread::Queue. Did you test this code? I got a 'Can't locate object method "end"...' warning for this line.

  • $workq->enqueue($urls[0], $urls[1], $urls[2]);

    Why not this? $workq->enqueue(@urls);

  • while(defined(my $url = $workq->dequeue)) { do { my $ua = LWP::UserAgent->new; foreach my $url (@urls) {
    You get $url from $workq then override it with each of the urls from @urls? Wouldn't this make each thread access every url?

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1005280]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (2)
As of 2017-03-31 01:56 GMT
Find Nodes?
    Voting Booth?
    Should Pluto Get Its Planethood Back?

    Results (364 votes). Check out past polls.