Perlコーディング初心 ..

---

[2ch|▼Menu]

■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
622:609 07/11/30 03:51:57 >>619 Mechanize というのを完全に誤解してたようです XML-RPCとかAtomPubなどとはまったく違うんですね。 なんというか、禁断の･･･いや、貴重な情報ありがとうございました。 623:nobodyさん 07/11/30 12:46:37 フォームメールに入力された内容を半角→全角に変換するプログラムがわかりません。 $str = '$mystr'; $kigou ='@!"#$%&\'()=-^\\|{}:;+*?_/<>'; require 'jcode.pl'; if ($FORM{'namae'} ne ''){ $mystr = $FORM{'namae'}; &hankaku; } sub hankaku{ &Jcode'convert(*str,'euc'); if($str =~ /^[0-9]{7,11}$/){ &jcode'tr(*str,'０-９Ａ-Ｚａ-ｚ','0-9A-Za-z'); }elsif ($str =~ /\x8E/) { &jcode'h2z_euc(*str); }else ($str =~ /$kigou/){ &jcode'tr(*str,'＠!”#$％＆’()=−＾￥｜｛｝：；+＊?＿/＜＞','@!"#$%&\'()=-^\\|{}:;+*?_/<>'); } &Jcode'convert(*str,'sjis'); $str = $value; exit 0; } 1度eucに変換してからと考えたんですが。

---

次ページ

最新レス表示

スレッドの検索

類似スレ一覧

話題のニュース

おまかせリスト

▼オプションを表示

レスジャンプ

mixiチェック！

Twitterに投稿

オプション

しおりを挟む

スレッドに書込

スレッドの一覧

暇つぶし2ch

---

4921日前に更新/271 KB
担当:undef