http://www.aoky.net/articles/jeff_atwood/why_cant_programmers_program.htm 書いてみた #!/usr/bin/perl for($i=1;$i<101;$i++) { $flg=0; if(($i%3) == 0) { print “Fizz”; $flg++; } if(($i%5) == 0) { print “Buzz”; $flg++; } if($flg == 0) { print $i; } } だいたい10分弱。俺は初級へっぽこプログラマと言えそうだ。