You can't draw from your experiment the conclusion that Perl doesn't have
a problem with random numbers. Perl does *not* generate
random number itself, it will let the OS do that for it.
Looking at Configure, Perl will try to use drand48(),
random() or rand(), in that order (unless configured manually
otherwise).

So, the best you can conclude there's no problem with whatever
function Perl is using on your system. It might be different
on other platforms

When putting a smiley right before a closing parenthesis, do you:

Use two parentheses: (Like this: :) )
Use one parenthesis: (Like this: :)
Reverse direction of the smiley: (Like this: (: )
Use angle/square brackets instead of parentheses
Use C-style commenting to set the smiley off from the closing parenthesis
Make the smiley a dunce: (:>
I disapprove of emoticons
Other