Help for this page

Select Code to Download


  1. or download this
    $ time perl mandelbrot1.pl 16000 > m1.pbm

...

  real    1.974s   ( MCE + Inline::C, mind boggling )
  2. or download this
    # http://benchmarksgame.alioth.debian.org/u64q/performance.php?test=ma
+ndelbrot
# based on Perl code contributed by Mykola Zubach
...
delete @picture{ 1, $m + 1 };
print  @picture{ sort { $b <=> $a } keys %picture };
  3. or download this
    # http://benchmarksgame.alioth.debian.org/u64q/performance.php?test=ma
+ndelbrot
# based on Perl code contributed by Mykola Zubach
...
delete @picture{ 1, $m + 1 };
print  @picture{ sort { $b <=> $a } keys %picture };