CGIPerl入力チェック
■ このスレッドは過去ログ倉庫に格納されています
すんません PerlMagickのモジュールを
FreeBSDのサーバで使いたいんですが
ユーザー権限でのみ作業すると
具体的にはどのようにやればいいんでしょうか? >>24
管理人さんに頼んでImage::Magickをインストールしてもらう。
これが一番確実。 >>13
しかし、何時見ても Perl のソースは読みづらい&使いづらいな。 >>26
それはperlが悪いわけではなく、プログラマの問題ではござらぬか。
print "hogehoge";
・
・
・
print "hogehoge";
うざっ CGI::Validateのサンプル眺めてると、
使わない方がよほどスッキリ書ける気がするのですが電波でしょうか? こう書けるの
use CGI ':all';
my %p = map{$_ => [param($_)]}param();
my @error = param_check(
[
{name=>'name', notnull=>1, length=>128, disp=>'名前'},
{name=>'mail', notnull=>0, length=>256, code=>\&chk_mail, disp=>'E-mail'},
{name=>'msg', notnull=>1, length=>3000, disp=>'メッセージ'}
],
\%p
);
error(@error) if @error;
つくろう。 >my %p = map{$_ => [param($_)]}param()
ReadParse使おうよ。
あ、untiedな配列に入れ直すのが味噌か。
>>35
ガッ
# このスレまだあったんだな・・・。 >>31のハッシュに、正規表現を追加したらどうだろうか?
regex => qr/[0-9a-zA-Z]{6,}/ _
|O\
| \ キリキリ
∧|∧ \ キリキリ
ググゥ>(;⌒ヽ \
∪ | (~)
∪∪ γ´⌒`ヽ
) ) {i:i:i:i:i:i:i:i:}
( ( ( ´・ω・)、
(O ⌒ )O
⊂_)∪ 誰でも簡単にネットで稼げる方法など
参考までに、
⇒ 『半藤のブブイウイウレレ』 というサイトで見ることができます。
グーグル検索⇒『半藤のブブイウイウレレ』
JETQ9W596N ■ このスレッドは過去ログ倉庫に格納されています