in reply to Rand Wackiness!

You might just try this: 
 perl -e 'print int(rand() * 10**15)

[download]
This will solve the problem if it is in the rand() function.
-- gam3
A picture is worth a thousand words, but takes 200K.

In Section Seekers of Perl Wisdom