Object-oriented with Perl

さとうふみやす です。

At Wed, 17 Oct 2001 16:42:59 +0900,
s-miyazaki@njc.co.jp wrote:
> このようなサブルーチンを使っていましたが、CGI.pmを継承して
> 漢字コード変換機能を付与する形でOOP化してみようと思いました。

昔 Perl の OOP やらの書き方をよく理解せずに場当たり的に作って
それをひきずってますが、モジュールを添付します。
ご参考までということで…。
ブラッシュアップしたいのだが時間も機会もないのでそのまんま。
# ダメ出し期待 (門前払いものか? :-)

CGI.pm を継承しているほかのモジュールを参考にしたと記憶しています。

Perl 5.00[45] ではそこそこ実績がありますが、Perl 5.6 以降は
ありません。

> CGI.pmが「$value =~ s/&/&/g;」あたりの処理もやってくれるので
> 楽だなと思っていたのですが、

それは HTML として出力するときだけしか必要ないので、
やるとしたら別のメソッドで実装でしょうかね。

> [1]でデータをセットしなおした時点にも「,」を「,」に
> 変換してしまっているようなのです。

はて、Perl 5.005 の CGI.pm はそんな動作をしていたっけ…。

--
SATOH Fumiyasu - fumiya @net-thrust.com, @samba.gr.jp, @namazu.org or ...
THRUST Co., Ltd. @ Fujisawa, Kanagawa, Japan - http://www.net-thrust.com
Samba-JP, aka `Samba Users Group Japan' - http://www.samba.gr.jp
Apache-JP(?), aka `Japan Apache Users Group' - http://www.apache.jp
Namazu, a full-text search engine - http://www.namazu.org


（添付元のMLメールを読む）