in reply to accessing randon number from perl script


Perhaps something like this would do:

open $TMP, '>', 'ZERO' or die $!; print $TMP, chr(0) for 0 .. 31; close $TMP; $cmd = "copy $vrl_1.bin/B + ZERO/B + $2.bin $3.bin"; system $cmd; $cmd = "del /y ZERO" system $cmd;

...extricating tongue from cheek.


Give a man a fish, and his hands will stink for a day. Teach him to fish, and they will stink for life.