C:\>perl -MPDL -E "srand(3); say rand();"
0.422170424674736

C:\>perl -MPDL -E "srand(3); say rand();"
0.000277820349769087