プログラマ問題として有名なfizz-buzzを書いてみました。条件は以下の通りです。 「⑴１から１００までの数字を書き出す⑵ただし３の倍数のときは【fizz】、５の倍数のときは【buzz】、３と５の公倍数の場合は【fizzbuzz】と出るようにする」 #!usr/local/bin/perl use strict; use warnings; foreach my $x (1..100){ my $three = ($x % 3); my $five = ($x % 5); if(!$three && !$five){ $x = 'fizzbuzz'; }elsif(!$three){ $x = 'fizz'; }elsif(!($five)){ $x = 'buzz'; } print "$x\n"; } 三項演算子を用いたり式の形式をいじるだけでもっと簡略化することも可能です。 per

Perl 5 マスター Wiki perl 5 まとめウィキ トップページページ一覧メンバー編集 トップページ 最終更新：ID:A3DQo4X0vA 2010年02月25日(木) 17:35:33履歴 Tweet <- ランキング参加中クリックしてね javaお断りします phpお断りします ﾊ,,ﾊ　ﾊ,,ﾊ （ ﾟωﾟ ）ﾟωﾟ ）　　rubyお断りします ／　　 　＼　　＼　　　　pythonお断りします ((⊂ 　） 　 ﾉ＼つﾉ＼つ)) （＿⌒ヽ　⌒ヽ ヽ　ﾍ　}　ﾍ　} ε≡Ξ　ﾉノ ｀Jノ ｀J XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX Are You Perl? XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 下のボタン押して、出てきたら小人さん*1待ちのページがりすと表示されます。小人さんにお願いしたい場合、タグに「小