diff options
| author | Matthew Neleigh <matthew.neleigh@gmail.com> | 2022-01-13 03:22:05 -0500 |
|---|---|---|
| committer | Matthew Neleigh <matthew.neleigh@gmail.com> | 2022-01-13 03:22:05 -0500 |
| commit | 52af0310f2a5236efe473139f6349a63d032c34b (patch) | |
| tree | aec4d0ed85974fb4d7a7da6fe2c51a0fd199d0e2 | |
| parent | 383fe407f81a60e0e65d1672837c0a4c230b9ed0 (diff) | |
| download | perlweeklychallenge-club-52af0310f2a5236efe473139f6349a63d032c34b.tar.gz perlweeklychallenge-club-52af0310f2a5236efe473139f6349a63d032c34b.tar.bz2 perlweeklychallenge-club-52af0310f2a5236efe473139f6349a63d032c34b.zip | |
modified: challenge-147/mattneleigh/perl/ch-2.pl
| -rwxr-xr-x | challenge-147/mattneleigh/perl/ch-2.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-147/mattneleigh/perl/ch-2.pl b/challenge-147/mattneleigh/perl/ch-2.pl index 867ef0e56a..b4ef6c6b05 100755 --- a/challenge-147/mattneleigh/perl/ch-2.pl +++ b/challenge-147/mattneleigh/perl/ch-2.pl @@ -60,7 +60,7 @@ for($i=1; $i<$n; $i++){ } # Uh oh... -if(!$done){ +unless($done){ warn("Qualifying Pentagonal Numbers not found with \$n = $n\n"); exit(1); } |