Help for this page

Select Code to Download


  1. or download this
    $ set seed=$RANDOM  # Or whatever
$ perl -e'$,=" "; $\="\n"; srand($ARGV[0]); print rand, rand, rand;' $
+seed
0.17082803610629 0.749901980484964 0.0963716556235674
$ perl -e'$,=" "; $\="\n"; srand($ARGV[0]); print rand, rand, rand;' $
+seed
0.17082803610629 0.749901980484964 0.0963716556235674