perl -e 'srand(0); print int(rand(99)) for 0 .. 9'