in reply to Re: Picking Random Lines from a File
in thread Picking Random Lines from a File

If so, his perl is broken. Quote rand,

Automatically calls srand unless srand has already been called.

>perl -e"print rand 1"
0.83843994140625
>perl -e"print rand 1"
0.795257568359375
>perl -e"print rand 1"
0.84637451171875

[download]

In Section Seekers of Perl Wisdom