Select Code to Download

my @primes = (2, 3, 5, 7, 11);          # None have been tested

...
    return $primes[$i];
  };
}

my $iter = prime_iterator();
my $count = 0;
$count++ while $iter->() < 1000000;
print $count;