Select Code to Download

E:\>perl -le "$x=10; @a=(0..5); for $x (@a) { print $x; $x=int(rand 10
+0); } print $x; print qq(@a)"
0
...
5
10
41 44 77 55 23 70