2010-02-17から1日間の記事一覧
for(my $i=1;$i<101;++$i){ print $i%3 && $i%5 ? $i : ($i%3 ? "" : "Fizz", $i%5 ? "" : "Buzz"), "\n"; } foreach((1...100)){ print $_%3 && $_%5 ? $_ : ($_%3 ? "" : "Fizz", $_%5 ? "" : "Buzz"), "\n"; } print map{ $_%3 && $_%5 ? $_ : ($_%3 ? ""…