Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
@list= pickInts( 10, 100000, 999999 );
print "@list\n";
print join " ", (shuffle(100000..999999))[0..9], $/;
  2. or download this
    > perl pick.pl
2 1 9
...
676232 765332 337745 257079 672444 306794 410807 382463 952100 532838
^C
>