diff options
Diffstat (limited to 'perl/p1.pl')
-rwxr-xr-x | perl/p1.pl | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -11,8 +11,8 @@ print "\n"; # Imperative my $sum; foreach my $i (1..999) { - if ($i % 3 == 0 || $i % 5 == 0) { - $sum += $i; - } + if ($i % 3 == 0 || $i % 5 == 0) { + $sum += $i; + } } print "$sum\n"; |