Help for this page

Select Code to Download


  1. or download this
    $m=250;print 2;for($b=3;$b<=$m;$b+=2){if(!$d[$a]){for($a=$b*$b;$a<=$m;
+$a+=$b){$c[$a]=1}}print",$b"}
  2. or download this
    use strict;
use warnings;
...

    print "$last\n";
}
  3. or download this
    23:05 >perl 1205_Obfu.pl
9999991
...
Ath   8.02 676%   --

23:11 >