Select Code to Download

#!/usr/bin/perl
use warnings;
...

win_srand(0);
print int(win_rand(99)) for 0..9;  # 023647263525973192.