Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Re: Poor randomness with File::Temp and fork().

by dws (Chancellor)
on Jun 27, 2004 at 17:04 UTC ( [id://370002]=note: print w/replies, xml ) Need Help??


in reply to Poor randomness with File::Temp and fork().

After rummaging around in File::Temp's guts and inserting some print statements for debugging, it seems that each of children try to use the same strings for the temporary filename(s).

Under the covers, the random number generator is used to produce a random set of characters to replace the "XXXX" that you can pass in the filename template. But if you're forking, each child is going to inherit the same starting seed, possibly leading to each child generating the same "random" name. Oops.

One way around this might be to reseed the random number generator for each child after you fork (using srand(), and passing it the child's process id).

Another way might be to use the optional "SUFFIX" argument and stick the process id in the suffix. Try something like

($fh, $filename) = tempfile($template, SUFFIX => ".$$")
and see if it works for you. Using the PID as a suffix a fairly standard convention.

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others wandering the Monastery: (9)
As of 2024-03-28 10:13 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found