CGIPerl入力チェック

[0013 nobodyさん 02/11/13 15:51 ID:6XVK1nob]

CGI::Validate
http://search.cpan.org/dist/CGI-Validate/

[0014 nobodyさん 02/11/13 18:33 ID:???]

よく「サーバにモジュールがインスコされていないので使えません」とか言う香具師
がいるけどさ、perlのモジュールなんて多くは単なるテキストなんだから、ホームに
コピーしてuse libすれよゴルァ、と思うんですがどうでっしゃろ。

[0015 sage 02/11/13 19:31 ID:6wplGlzP]

~/.cpanにある設定ファイルでインストール先を自分のhome配下に指定して
CPANからいただく。そしてuse lib。
telnetやらでloginできなきゃいけないがの。

[0016 nobodyさん 02/11/13 19:33 ID:???]

やっちまった。逝きます。

[0017 nobodyさん 02/11/14 05:47 ID:???]

BEGIN{ push @INC, './lib'}
BEGIN{ unshift @INC, './lib'}
のが好き

[0018 nobodyさん 02/11/24 23:41 ID:nYY6oDGd]

結構めんどくさい部分ではあるから
みんなで考えるのもいいかもしれない。
個人的には9のやり方をもう少し煮詰めて
モジュール化できたらいいなーとか思った。

[0019 nobodyさん 02/11/25 15:05 ID:???]

まとまりなく終了

[0020 nobodyさん 02/11/29 11:20 ID:qCZWTQlc]

↑勝手に終わらせるなボケ

[0021 1 02/11/30 15:26 ID:3PGwc+wR]

>>18
まだよくみてないけど13のCGI::Validateがそれっぽいのでは

[0022 nobodyさん 02/12/03 02:37 ID:yNGrdCEK]

例えばtelnetの使えないレンタルサーバーの場合に、
pure perlならモジュールをFTPでアップして
「use lib」とかすればいいと思うけど、
結構大きなモジュールの場合（例えばDBIとか）
落としてきたtar.gzの中身はファイルやフォルダが
いっぱいあってどれをどのようにUPすれば分からないんだけど。

[0023 nobodyさん 02/12/04 08:29 ID:obM+TZZG]

README.txtに書いてあるはずだが。

[0024 nobodyさん 02/12/04 18:38 ID:???]

すんません　PerlMagickのモジュールを
FreeBSDのサーバで使いたいんですが
ユーザー権限でのみ作業すると
具体的にはどのようにやればいいんでしょうか？

[0025 nobodyさん 02/12/04 22:42 ID:???]

>>24
管理人さんに頼んでImage::Magickをインストールしてもらう。

これが一番確実。

[0026 nobodyさん 02/12/06 06:29 ID:oIFfImYM]

>>13

しかし、何時見ても Perl のソースは読みづらい＆使いづらいな。

[0027 nobodyさん 02/12/06 07:33 ID:???]

>>26
それはperlが悪いわけではなく、プログラマの問題ではござらぬか。

[0028 nobodyさん 02/12/07 00:30 ID:???]

CGI::Validateつかいづら

[0029 nobodyさん 02/12/07 03:52 ID:NfROD7dM]

print "hogehoge";
　　・
　　・
　　・
print "hogehoge";

うざっ

[0030 nobodyさん 02/12/07 13:29 ID:???]

CGI::Validateのサンプル眺めてると、
使わない方がよほどスッキリ書ける気がするのですが電波でしょうか?

[0031 nobodyさん 02/12/07 17:31 ID:???]

こう書けるの

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;

つくろう。

[0032 nobodyさん 02/12/08 10:43 ID:???]

>my %p = map{$_ => [param($_)]}param()

ReadParse使おうよ。
あ、untiedな配列に入れ直すのが味噌か。

[0033 11=13=33 02/12/21 20:48 ID:lsUxGFk4]

Data::CGIForm
http://search.cpan.org/dist/Data-CGIForm/

なかなかコレというものがないものですね

[0034 nobodyさん 03/11/19 10:16 ID:???]

ぬ

[0035 ウキグリバの戦士 2005/04/03(日) 01:57:03 ID:???]

ぬるぽ

[0036 ウキグリバの戦士 2005/04/03(日) 02:05:44 ID:???]

↑これでラストだ！おめでとう！

[0037 nobodyさん 2005/05/16(月) 16:21:55 ID:???]

>>35
ガッ

# このスレまだあったんだな・・・。

[0038 nobodyさん 2006/03/17(金) 01:24:09 ID:???]

.

[0039 nobodyさん 2006/06/25(日) 23:32:13 ID:ApY7Mi3z]

ぬぽる

[0040 nobodyさん 2006/06/26(月) 04:47:56 ID:???]

http://search.cpan.org/perldoc?Data::FormValidator
http://search.cpan.org/perldoc?FormValidator::Simple

[0041 nobodyさん 2008/08/21(木) 11:31:34 ID:jfZH+CbL]

>>31のハッシュに、正規表現を追加したらどうだろうか？

regex => qr/[0-9a-zA-Z]{6,}/

[0042 nobodyさん 2008/08/21(木) 13:36:07 ID:???]

>>41
小学校分の亀レス乙。

[0043 電脳プリオン 2011/12/11(日) 22:26:19.67 ID:???]

Perlの次は？

[0044 nobodyさん 2013/03/27(水) 21:43:52.61 ID:IuHY8fTv]

　　　　　 _
　　　　　 |O＼
　　　　　 |　　 ＼　ｷﾘｷﾘ
　　　　∧|∧ 　　＼　ｷﾘｷﾘ
ｸﾞｸﾞｩ>（；⌒ヽ　　　 ＼
　　　　∪　　|　　 　　(~)
　　　　　∪∪　　 γ´⌒｀ヽ
　　　　　）　）　　 　{i:i:i:i:i:i:i:i:}
　　　　 （　（　　　　(　´･ω･)、
　　　　　　　　　　　(O ⌒　)O
　　　　　　　　 　 　⊂＿)∪

[0045 nobodyさん 2017/12/30(土) 12:52:13.96 ID:YhlYw6jg]

誰でも簡単にネットで稼げる方法など
参考までに、
⇒　『半藤のブブイウイウレレ』 というサイトで見ることができます。

グーグル検索⇒『半藤のブブイウイウレレ』

JETQ9W596N