小编Gra*_*SOS的帖子

我是一名初级编码员，我已经开始从 projecteuler.net 做 Project Euler 的工作，并且遇到了问题 #1。问题是：

如果我们列出所有 10 以下的自然数是 3 或 5 的倍数，我们会得到 3、5、6 和 9。这些倍数之和是 23。

找出 1000 以下所有 3 或 5 的倍数之和。

我也有以下代码：

#!/usr/bin/perl

use strict;
use warnings;

my $a;
my $b;
my $c = 0;
my $d = 0;
my $e;

for ($a= 0; $a < 1000; $a += 3 ) {
    $d = $d + $a;
}
for ($b= 0; $b < 1000; $b += 5 ) {
    $c = $c + $b;
}
$e …