>perl5.8.6.exe -le"srand(1); print rand for 1 .. 10"
0.001251220703125
0.563568115234375
0.19329833984375
0.8087158203125
0.584991455078125
0.4798583984375
0.35028076171875
0.89593505859375
0.82281494140625
0.74658203125