Prime triangle: Difference between revisions
m
→{{header|Perl}}: splice out 'undef' list element
SqrtNegInf (talk | contribs) m (Added Perl) |
SqrtNegInf (talk | contribs) m (→{{header|Perl}}: splice out 'undef' list element) |
||
Line 792:
my $nope = 0;
for my $o (permutations [@odd_nums]) {
my @list = (zip
my $it = slideatatime(1, 2, @list);
while ( my @rr = $it->() ) {
| |||