diff options
| -rwxr-xr-x[-rw-r--r--] | challenge-003/joelle-maslak/perl5/ch-1.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-003/joelle-maslak/perl5/ch-1.pl b/challenge-003/joelle-maslak/perl5/ch-1.pl index 45642bd764..da088b4a6e 100644..100755 --- a/challenge-003/joelle-maslak/perl5/ch-1.pl +++ b/challenge-003/joelle-maslak/perl5/ch-1.pl @@ -23,7 +23,7 @@ while ( scalar(@hamming) < $count ) { $i++; } -say "Hamming numbers [0.." . ($count-1) . "]: " . join( ", ", @hamming ); +say "Hamming numbers [0.." . ( $count - 1 ) . "]: " . join( ", ", @hamming ); sub ishamming($i) { my @primes = primedivisors($i); |