diff options
| author | Adam Russell <ac.russell@live.com> | 2021-07-25 13:19:26 -0400 |
|---|---|---|
| committer | Adam Russell <ac.russell@live.com> | 2021-07-25 13:19:26 -0400 |
| commit | ba6da4313d6503a14d3b86a55affa80c9c3856d0 (patch) | |
| tree | 251a11c4e1ea9f33057b6939d3a455da86d60f65 | |
| parent | b26ee662d816103f8e48959b6bcb254c110064a9 (diff) | |
| download | perlweeklychallenge-club-ba6da4313d6503a14d3b86a55affa80c9c3856d0.tar.gz perlweeklychallenge-club-ba6da4313d6503a14d3b86a55affa80c9c3856d0.tar.bz2 perlweeklychallenge-club-ba6da4313d6503a14d3b86a55affa80c9c3856d0.zip | |
updated Perl solution to task #2
| -rw-r--r-- | challenge-122/adam-russell/perl/ch-2.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-122/adam-russell/perl/ch-2.pl b/challenge-122/adam-russell/perl/ch-2.pl index e2eb2d08e0..9d830ceb4f 100644 --- a/challenge-122/adam-russell/perl/ch-2.pl +++ b/challenge-122/adam-russell/perl/ch-2.pl @@ -39,7 +39,7 @@ MAIN:{ } $S = 5; print "\n\$S = $S\n"; - my @point_combinations = basketball_points($S); + @point_combinations = basketball_points($S); for my $points (basketball_points($S)){ print join(" ", @{$points}) . "\n"; } |