Help for this page

Select Code to Download


  1. or download this
    C:\Users\Laurent>perl -e "srand(555); my $range = 1000; my $number = i
+nt(rand($range)); print $number ;"
56
  2. or download this
    Laurent@Laurent-HP ~
$ perl -e 'srand(555);
...
> my $number = int(rand($range));
> print $number,"\n";'
466