Successive prime differences: Difference between revisions
m
→{{header|Perl}}: print not say
SqrtNegInf (talk | contribs) m (→{{header|Perl}}: use module instead of (deprecated) smartmatch) |
SqrtNegInf (talk | contribs) m (→{{header|Perl}}: print not say) |
||
Line 1,346:
<lang perl>use strict;
use warnings;
use List::EachCons;
use Array::Compare;
Line 1,355 ⟶ 1,354:
my @intervals = map { $primes[$_] - $primes[$_-1] } 1..$#primes;
my $c = Array::Compare->new;
| |||