Help for this page

Select Code to Download

Select or download this

   my %is_prime;
   @primes = grep { 
...
                or 
                ( $is_prime{$_} = is_prime($_) )
             } @numbers;