新しくperlで標準で欲しい関数は？ (203ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

179(2): 2010/01/01(金)00:56 ID:ErV6JCho(1) AAS
素数判定関数

---

180: 2010/01/26(火)21:18 ID:kYFNuHJ9(1) AAS
>>179

sub　is_prime_number {
　　if($_[0] =~ /^(2|3|5|7|11|13|17|19|23|29|31|37|41|43|47|53|59|61|67|71|73|79|83|89|97)$/){
　　　　return 1;
　　}
　　return 0;
}

# 判定する素数を増やしたい場合は正規表現の中に追加します

---

184(1): 2010/03/04(木)18:56 ID:Dn/1ULzG(1) AAS
>>179ですが

却下
そもそも関数じゃないし

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.012s