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