>>831
> 3で割り切れる数値の表示の仕方を教えてください

my $i = 0;
while (1) {
print $i++ * 3 . "\n";
}
# 終わらない。

え、ちがう?