Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic

Re: accessing randon number from perl script

by TomDLux (Vicar)
on May 24, 2012 at 19:10 UTC ( #972297=note: print w/replies, xml ) Need Help??

in reply to accessing randon number from perl script

You aren't copying the files with Perl, you are copying the files fith a DOS command which is invoked from Perl.

If your goal is to eliminate the file of zeroes, I would suggest a perl routine to open an input file, copy it line by line to a provided output filehandle, and then close the file. To insert the zeroes, you can simply write to the output filehandle .... except you may need to reopen it in binary mode. Maybe printing "\x00" .. the string containing a single byte with the value 00 ... will work, you can give it a try.

P.S. What does this have to do with "accessing randon number from perl script"?

As Occam said: Entia non sunt multiplicanda praeter necessitatem.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://972297]
[Corion]: Hi marto, Discipulus, choroba!
[Corion]: Seems like I chose just the right day to do a half-day recovery yesterday. Today it's snowing again, instead of the sun shining, so that's a good day to be at the office again ;)
[Discipulus]: good morning folks!
[choroba]: Boasting: brian d foy tweeting my blogpost!
[Discipulus]: eh eh choroba print it on a t-shirt for the next yapc.. ;=)

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (8)
As of 2018-03-22 09:19 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (273 votes). Check out past polls.