Perlについての質問箱 25箱目
レス数が900を超えています。1000を超えると表示できなくなるよ。
0944デフォルトの名無しさん
2006/07/19(水) 01:36:25package名はHTML::SpTemplateのほうがいいんじゃない?
use warningsがないのがキモイ。
use vars qw($VERSION %GLOBAL);よりもour ($VERSION %GLOBAL);のほうが。
ていうか%GLOBALってmy変数じゃダメなの?教えて偉い人。
693行目の2引数のopenキモイ。古いPerlのこと考えたらしょうがないかもしれないけど。
sub Outputが大文字で始まるのキモイ。PODは小文字で書いてあるのに。
sub _warnだけど、dieするんなら$thisを返さなくてもいいんじゃないの? sub sub_dumperもそう。
というか、俺ならこうする(動くか試してないけど)
sub _warn {
my $this = shift;
require Carp;
goto &Carp::croak;
}
たしかモジュールの中でdieすると、「SpTemplateモジュールのn行目でdieしました」ってエラーメッセージのはず。
ユーザ側からすると、自分のプログラムの何行目でエラーになったかのほうが重要だから&Carp::croakのほうがいい。
Carpは標準モジュールだし依存してもいいと思う。
ついでにいうとdieしてるのに_warnっていうメソッド名なのがキモイ。_dieのほうがふさわしい。
Data::Dumperも標準モジュールだから
sub sub_dumper {
my ($this, $param, $attrs) = @_;
require Carp;
require Data::Dumper;
Carp::croak(Data::Dumper::Dumper [$param, $attrs]);
}
って書きたいかも。つーかメソッド名もsub _dumperのほうがいいかな。
あとBSD Licenseよりも、GPL/Artistic Licenseがいいな。
眠いから変なこといってたらごめん。
レス数が900を超えています。1000を超えると表示できなくなるよ。