From 8a283afeee636e143dab9f3f9feb9ab2089b2230 Mon Sep 17 00:00:00 2001 From: Matthew Neleigh Date: Wed, 23 Feb 2022 16:23:05 -0500 Subject: modified: challenge-153/mattneleigh/perl/ch-2.pl --- challenge-153/mattneleigh/perl/ch-2.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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); } -- cgit