aboutsummaryrefslogtreecommitdiff
path: root/challenge-151
diff options
context:
space:
mode:
authorMohammad S Anwar <Mohammad.Anwar@yahoo.com>2022-02-14 00:10:37 +0000
committerGitHub <noreply@github.com>2022-02-14 00:10:37 +0000
commiteb61c9d59dfad408888f0b3b6a10d792a9f9d126 (patch)
tree199c8782c703aa22f1b144f65c814f4112f8883d /challenge-151
parent152af5a159cdbc09d7b40394dcfe0e2773a524ba (diff)
parentbec2e819618a9038e28bd0106a0c5a0da81796a8 (diff)
downloadperlweeklychallenge-club-eb61c9d59dfad408888f0b3b6a10d792a9f9d126.tar.gz
perlweeklychallenge-club-eb61c9d59dfad408888f0b3b6a10d792a9f9d126.tar.bz2
perlweeklychallenge-club-eb61c9d59dfad408888f0b3b6a10d792a9f9d126.zip
Merge pull request #5651 from mattneleigh/pwc151
modified: challenge-151/mattneleigh/perl/ch-2.pl
Diffstat (limited to 'challenge-151')
-rwxr-xr-xchallenge-151/mattneleigh/perl/ch-2.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-151/mattneleigh/perl/ch-2.pl b/challenge-151/mattneleigh/perl/ch-2.pl
index 6a94d054bf..59a78cbc57 100755
--- a/challenge-151/mattneleigh/perl/ch-2.pl
+++ b/challenge-151/mattneleigh/perl/ch-2.pl
@@ -91,7 +91,7 @@ sub calculate_loot_yield_on_street{
$loot[1] = max($ARG[0], $ARG[1]);
for($i = 2; $i < scalar(@ARG); $i++){
- $loot[$i] = max(@ARG[$i] + $loot[$i - 2], $loot[$i - 1]);
+ $loot[$i] = max($ARG[$i] + $loot[$i - 2], $loot[$i - 1]);
}
return($loot_initial + $loot[$#loot]);