aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMohammad S Anwar <Mohammad.Anwar@yahoo.com>2022-02-24 10:24:15 +0000
committerGitHub <noreply@github.com>2022-02-24 10:24:15 +0000
commit161575f9d25f7f060f5a2305e7838dfa4426e952 (patch)
tree138c06e9b8b4f787387ad3ff040af12025496ff8
parente5f746f7287eafbea87a8f545c2266e01c378323 (diff)
parent8a283afeee636e143dab9f3f9feb9ab2089b2230 (diff)
downloadperlweeklychallenge-club-161575f9d25f7f060f5a2305e7838dfa4426e952.tar.gz
perlweeklychallenge-club-161575f9d25f7f060f5a2305e7838dfa4426e952.tar.bz2
perlweeklychallenge-club-161575f9d25f7f060f5a2305e7838dfa4426e952.zip
Merge pull request #5700 from mattneleigh/pwc153
modified: challenge-153/mattneleigh/perl/ch-2.pl
-rwxr-xr-xchallenge-153/mattneleigh/perl/ch-2.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-153/mattneleigh/perl/ch-2.pl b/challenge-153/mattneleigh/perl/ch-2.pl
index 9e71c1f72f..bece45b7b6 100755
--- a/challenge-153/mattneleigh/perl/ch-2.pl
+++ b/challenge-153/mattneleigh/perl/ch-2.pl
@@ -67,7 +67,7 @@ sub is_factorion{
$sum += $factorials[$ARG];
}
- return($sum == $n);
+ return($sum == $n ? 1 : 0);
}