diff options
| author | Alexander Pankoff <ccntrq@screenri.de> | 2021-12-14 10:48:48 +0100 |
|---|---|---|
| committer | Alexander Pankoff <ccntrq@screenri.de> | 2021-12-14 10:48:48 +0100 |
| commit | ff1256a60687a9903b39c0887e3c64115748b90d (patch) | |
| tree | 2edca2bd2feb8b25ba0f0d2650785dbccabfd602 | |
| parent | 50e1d3c36fa027ad2aa3ef5f1b3d07c878778d0d (diff) | |
| download | perlweeklychallenge-club-ff1256a60687a9903b39c0887e3c64115748b90d.tar.gz perlweeklychallenge-club-ff1256a60687a9903b39c0887e3c64115748b90d.tar.bz2 perlweeklychallenge-club-ff1256a60687a9903b39c0887e3c64115748b90d.zip | |
Fix formatting
| -rwxr-xr-x | challenge-143/alexander-pankoff/perl/ch-2.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-143/alexander-pankoff/perl/ch-2.pl b/challenge-143/alexander-pankoff/perl/ch-2.pl index 8eba88cc93..a952866cde 100755 --- a/challenge-143/alexander-pankoff/perl/ch-2.pl +++ b/challenge-143/alexander-pankoff/perl/ch-2.pl @@ -36,7 +36,7 @@ sub explain($stealthy) { "Since $a (a) * $b (b) = $c (c) * $d (d) and $a (a) + $b (b) = $c (c) + $d (d) + 1"; } -sub pairs(@xs ) { +sub pairs(@xs) { my @out; for my $i ( 0 .. $#xs - 1 ) { push @out, map { [ $xs[$i], $xs[$_] ] } ( $i + 1 .. $#xs ); |