Emirp primes: Difference between revisions

m
→‎{{header|Perl}}: tweaked pragmas
m (→‎{{header|Perl}}: tweaked pragmas)
Line 2,364:
 
=={{header|Perl}}==
{{libheader|ntheory}}
<lang perl>use Math::Prime::Util qw/:all/;
<lang perl>use v5.16; # To getfeature 'say';
use ntheory qw(forprimes is_prime);
 
# Return the first $count emirps using expanding segments.
2,392

edits