半角カタカナ追放運動

[上に] [前に] [次に]
提案 1998/12/13(日) 10:29:08
半角カタカナが入力されると、投稿できない様にする、というのは
CGI(の掲示板やチャット)で可能でしょうか?
注意する手間がはぶけると思うのですが。

縺ィ縺サ縺サ 1998/12/13(日) 17:44:20
譛霑代ョ jcode.pl 縺ァ縺ゅl縺ー縲∝濠隗偵き繝翫r蜈ィ隗偵き繝翫↓螟画鋤縺吶k髢「謨ー縺後≠
繧翫∪縺吶I2z_sjis(*xx)縲ゅ%繧後r逕ィ縺繧九ョ繧ゅh縺縺九b縲

とほほ 1998/12/13(日) 17:45:26
ありゃりゃ、文字化けしてしまいました。

とほほ 1998/12/13(日) 18:43:33
最近の jcode.pl であれば、半角カナを全角カナに変換する方法が
サポートされています。h2z_sjis(*xx)。

提案 1998/12/13(日) 19:33:18
>「半角カナを全角カナに変換する」えっえっ何ですかそれは?!
h2z_sjisという関数なのでしょうか??

B-Cus 1998/12/14(月) 00:00:22
例えばこんなの。
---begin---
require 'jcode.pl';
open(IN,"hankaku-data");
$org_data = $data = scalar(<IN>);
&jcode::h2z_euc(*data);

if ( $org_data ne $data ){
 print "半角かなが含まれています。やりなおし。";
 print "変換前 $org_data\n変換後 $data\n";
}
---end---

 &jcode::h2z_euc(*data);
の代わりに
 &jcode::convert(*data,'euc');
 &jcode::h2z_euc(*data);
とか
 &jcode::convert(*data,'sjis');
 &jcode::h2z_sjis(*data);

 &jcode::convert(*data,'jis');
 &jcode::h2z_jis(*data);
などでもいいでしょう。

今回、僕の作ったhankaku-dataがEUCだったので
 &jcode::convert(*data,'euc');
を省けたわけです。

あと「半角カナを見付けると警告を出す」というのは
非常にいいと思います。「半角カナを全角カナに変換して書き込む」
というのでは、教育効果がないので。

それからjcode.plはここにあります。
 ftp://ftp.iij.ad.jp/pub/IIJ/dist/utashiro/perl/

提案 1998/12/14(月) 12:14:04
[[解決]]
おお、ありがとうございます>B-Cusさん。
さっそく僕の掲示板にも機能追加してみます。

提案 1998/12/14(月) 12:17:04
[[解決]]
おお、ありがとうございます。>とほほさん、B-Cusさん。
さっそく僕の掲示板にも機能追加してみます。

そもそも、OSが半角カナを使ってる事自体が
おかしいんですよね・・・

[上に] [前に] [次に]