Perlマスターブック Perl5.6/5.8対応作者: 坂田健二出版社/メーカー: 毎日コミュニケーションズ発売日: 2008/03/27メディア: 単行本（ソフトカバー） クリック: 1回この商品を含むブログ (5件) を見るMovable Type プロフェッショナル・スタイル MT4.1対応 (…

for(1..100){ if (2 ** ($_ - 1) % $_ == 1 || $_ == 2) { print "$_ は素数\n"; } else { print "$_ は×\n"; } } 結果 1 は× 2 は素数 3 は素数 4 は× 5 は素数 6 は× 7 は素数 8 は× 9 は× 10 は× 11 は素数 12 は× 13 は素数 14 は× 15 は× 16 は× 17 は…