problem 1
public text v1 · immutable#!/usr/bin/perl
$sum += $_ while (($_ = (3*++$multiply1)) < 1000);
$sum += $_ while (($_ = (5*++$multiply2)) < 1000);
print $sum;
#!/usr/bin/perl
$sum += $_ while (($_ = (3*++$multiply1)) < 1000);
$sum += $_ while (($_ = (5*++$multiply2)) < 1000);
print $sum;