Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Re^3: Perl thread confustion

by BrowserUk (Patriarch)
on Feb 15, 2013 at 07:28 UTC ( [id://1018860]=note: print w/replies, xml ) Need Help??


in reply to Re^2: Perl thread confustion
in thread Perl thread confustion

But in the following thread can the sub see $x because it closes over $x, or can the sub see $x because:

It can see it, because the sub closes over it.

But it would have been copied to the new thread anyway even if the sub didn't close over it -- because it existed when the thread was spawned -- but it isn't useful within the thread because if it isn't closed over, nothing can see it (nor therefore use it).

Hence my comment "I have no idea why this happens. In my opinion it should not.".

If perl copies all the data to a thread, why doesn't the following code also output 20:

Enable strict or warnings and perl will tell you why.

(And note: I didn't say "all the data"; I said "exist in the spawning thread prior to a 'child' thread being spawned." It is a subtle, but very important difference.)

But, if you doubt my assertion that non-closed-over variables created after the thread sub is declared but before it is spawned are also cloned, run this and monitor the memory usage using the task manager or your OS equivalent:

perl -Mthreads -wE"sub x{ sleep 100 }; my @x=1..1e7; sleep 10; async(\ +&x)->detach; sleep 100"

What you'll see is something like this. The array is created and memory usage jumps to ~900MB and levels out for 10 seconds before the thread is spawned. It then jumps to ~1.9GB. Despite that the thread can never make any use of the copy that is made, because it is not lexical visible to it.

It makes no sense whatsoever, but try getting anyone to change it.

But, as I said above, the good news is that it is easy to avoid, by spawning your threads before you populate data structures used by your main thread code.


With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.

Replies are listed 'Best First'.
Re^4: Perl thread confustion
by 7stud (Deacon) on Feb 15, 2013 at 19:20 UTC

    - but it isn't useful within the thread because if it isn't closed over, nothing can see it (nor therefore use it). Hence my comment "I have no idea why this happens. In my opinion it should not.".

    I see. So data is copied, but it is not accessible. Seems like a great feature!

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1018860]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others romping around the Monastery: (4)
As of 2024-04-24 03:05 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found