トップページ⇒php
83コメント27KB

もっと軽くて渋いCGI.pmを創ろう

■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん＠お腹いっぱい。01/12/25 13:52ID:KBD2Ypc8
お願いしまふ
0033名無しさん＠お腹いっぱい。01/12/25 20:13ID:???
>>31は自分で自分の外出禁止令を出して何が楽しいのでしょうか？
0034名無しさん＠お腹いっぱい。01/12/25 20:14ID:???
と、こんな厨房もたまに乱入しますが
気にせず行きましょう。
0035名無しさん＠お腹いっぱい。01/12/25 23:26ID:???
>>30
Perl6で無くなるんだっけ？
でも利点が多いんで使いたいのだ。

・ただのハッシュよりはコンパクト
・条件付で高速なアクセス
・フィールド継承のサポート
0036名無しさん＠お腹いっぱい。01/12/26 00:31ID:RrkKaZX3
こんなのどう。

sub get_full_query {
my $self = shift;

my $str = "";
$ENV{CONTENT_LENGTH} and read(STDIN, $str, $ENV{CONTENT_LENGTH});
$ENV{QUERY_STRING} and $str .= $ENV{QUERY_STRING};

my $query;
for (split /&/, $str) {
my ($name, $value) = map $self->url_decode($_), split /=/, $_;
push @{$$query{$name}}, $value;
}
$self->{_query} = $query;
}

sub url_decode {
my $self = shift;
my $part = shift;
$part =~ tr/+/ /;
$part =~ s/%([0-9A-Fa-f]{2})/pack("c", hex($1))/ges;
$part;
}
0037名無しさん＠お腹いっぱい。01/12/26 00:53ID:???
だれかXSで作ってくれねーかな。
0038名無しさん＠お腹いっぱい。01/12/26 08:58ID:???
CGI_Lite.pmはガイシュツだけど、
CGI::Minimalとかどうよ？
漏れは使ったこと無いが。
0039名無しさん＠お腹いっぱい。01/12/26 13:16ID:0snM5bma
>>38
使える機能
・フォームのデコード
・アップロードの処理
・url エンコード・デコード
・< とか > とか & のエスケープ、
・RFC1123形式の時間表示

シンプルでよさげ。
クッキー周りを自分で書くなら、これいいかも。
0040名無しさん＠お腹いっぱい。01/12/27 02:14ID:???
こう言うのってマルチパートの時オブジェクト返すのばっかりかな
CGI->fileprint("FormName");
みたいに出来ないと精神的にかなり嫌だ
0041ダメ男01/12/29 04:16ID:3B5IEZRj
$value=~ s/%(..)/chr(hex($1))/eg;
これのほうが速くない？
0042a02/08/13 10:12ID:???
print $query->checkbox(-name=>'checkbox_name',
-checked=>'checked', # この行
-value=>'on',
-label=>'Turn me on');

とやると

<input type="checkbox" name="checkbox_name" value="on" checked>
みたいになるけど デフォルトでcheckedさせないようにするにはどうすればいいのかな?

#つまりは

-checked=>'checked',

#この行があってもなくてもデフォルトでcheckedになってしまうのでそれを何
#とかしたい
0043nobodyさん02/08/13 10:37ID:???
何故にこのスレを選んだかなぁ。。。
0044nobodyさん02/08/13 13:19ID:???
Apache::Request使うからいいよべつに。
0045山崎渉03/01/15 13:51ID:???
（＾＾）
0046山崎渉03/03/13 17:48ID:???
（＾＾）
0047nobodyさん03/03/21 18:05ID:pOguTMzc
cgi-lib.plではダメなのか？
0048nobodyさん03/03/21 22:32ID:???
http://www.vector.co.jp/soft/unix/net/se276868.html
0049nobodyさん03/03/21 23:40ID:???
>>48
ひどすぎるそれ。
2次配布禁止ってなってるけど、それで正解だ。
むご過ぎて、2次配布する価値無しだ。
0050nobodyさん03/03/21 23:48ID:???
decode.plなんて汎用的な名前をつけるなよ・・
0051nobodyさん03/03/21 23:48ID:???
>>48
strictなコードで書いてほしい・・・
cgi-lib.plと同じじゃないかそれじゃ

といっても最近はCGI.pm使うようになっちゃったからなぁ
無用だね
0052nobodyさん03/03/21 23:56ID:???
http://www.vector.co.jp/soft/unix/net/se273675.html
Cookieの送受信に便利なPerlライブラリ
泣けるなぁ・・
0053nobodyさん03/03/22 10:52ID:WPdkGWdU
勝手にメインパッケージの変数書き換えるなよ…
0054nobodyさん03/03/22 13:59ID:35k142Il
説明のほうが長いという罠
0055nobodyさん03/03/22 16:35ID:???
モジュールの作り方を説明しているページってありませんか？
0056nobodyさん03/03/22 18:57ID:???
>>55
http://bulknews.net/lib/slides/perl-ruby-con2000/
0057山崎渉03/04/17 12:12ID:???
（＾＾）
0058山崎渉03/04/20 06:21ID:???
　　 ∧＿∧
　　（　　＾＾ ）＜ ぬるぽ（＾＾）
0059山崎渉03/05/22 02:21ID:???
━―━―━―━―━―━―━―━―━[JR山崎駅（＾＾）]━―━―━―━―━―━―━―━―━―
0060山崎渉03/05/28 17:09ID:???
　　　 　∧＿∧
ﾋﾟｭ.ｰ　(　　＾＾ ） ＜これからも僕を応援して下さいね（＾＾）。
　　＝〔~∪￣￣〕
　　＝ ◎――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉
0061山崎 渉03/07/15 11:25ID:???

　__∧＿∧_
　|（　　＾＾ ）|　＜寝るぽ（＾＾）
　|＼⌒⌒⌒＼
　＼ |⌒⌒⌒~|　　　　　　　　　山崎渉
　　 ~￣￣￣￣
0062山崎 渉03/08/02 02:28ID:???
　　 ∧＿∧
　　（　　＾＾ ）＜ ぬるぽ（＾＾）
0063ぼるじょあ ◆ySd1dMH5Gk 03/08/02 05:01ID:???
　　　 　∧＿∧　 ∧＿∧
ﾋﾟｭ.ｰ　（　 ・３・） (　　＾＾ ） ＜これからも僕たちを応援して下さいね（＾＾）。
　　＝〔~∪￣￣￣∪￣￣〕
　　＝ ◎――――――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉&ぼるじょあ
0064山崎 渉03/08/15 23:28ID:???
　　　 (⌒V⌒)
　　　│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
　　⊂|　　　　|つ
　　　（＿）（＿）　　　　　　　　　　　　　　　　　　　　　　山崎パン
0065名無し募集中。。。04/06/13 20:24ID:???



　　　　　　　　　. ||
　　　　　　　　　. ||
.　　　　☆ノハヽθ　＿＿＿＿＿＿
　　　　||ﾉﾉ*＾ｰ＾) ｱｰﾃｽﾃｽ　(:::) .／|
　　　　|| /　つと　　||||.　　　　.／　. |
　　　　|二 ／ []　.　￣ .　　／　　／
　　　　　　|￣￣￣￣￣￣|　. ／
　　　　　　|＿＿＿＿＿＿|／

0066名無し募集中。。。04/06/13 20:25ID:???


.　Y￣￣⌒⌒⌒⌒￣￣~`ヽ
　　＼＼※※※※※※※　 ＼
　.　　.＼＼※※※※※※※　 ＼
　　　　　＼＼※※　〆〃ハハ　～♪
　　 　 　 　 ＼ヽ　γ∬∬´▽｀)※　. ＼
　　.　　　　　　ヽ(~~~~~~∪~~∪~~~~~~~~)
　　　　　　　　　　￣￣￣￣￣￣￣￣￣
　　　＿＿＿＿
.　／　　／　|　|　　　　　　　　＼　ｱｰﾃｽﾃｽ…　／
　|二二|　　｜ |　　　　　　　　　　　　　　　　　　ww
.　＼　　＼　|　|　　　　　　　　　　　＿＿＿＿./
|￣￣￣￣￣￣|　　　　　　　　　　|囲　＝　囲|
　　　　　　　　　　　　　　　　　　　　￣￣￣￣

0067名無し募集中。。。04/06/13 20:25ID:???


.　　☆ノハヽ ﾖｼ!!
.　　ﾉﾉ*＾ｰ＾)　　　　||| |◎▼
　　　/ つと　　　　（　99　::）
　　⊂＿)__)　　　　（　　[]　）))
.　　　　　　　　　　　￣￣￣

0068名無し募集中。。。04/06/13 20:26ID:???



　　 ||◎▼☆ノハヽ ｼｭｯﾊﾟｰﾂ!!
　　（　99　ﾉﾉ*＾ｰ＾)o
　　（　　[]　）))　　/
.　　.￣￣￣ u─ｕ

0069名無し募集中。。。04/06/13 20:26ID:???

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;,＿＿_,;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;__, . |　□　|;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;□|　| |___|　□　|＿＿|;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;|　|[]|　　||　□　|　　　|;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;　　;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;／　　＼;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;／ 　　　　　＼;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;／　　　　　　　　　＼;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;／　　.　　　　　　　　　　＼;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;／　　　　　|||◎◎/　　　　　　＼;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;／　　.　　　　（======） ﾄｵｲ…　　. ＼;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;／　　　　　　　　（＿＿＿）]　　.　　　　　　＼;;;;;;;;;;;;;;;
;;;;;;;;／　　　　　　　　　　　u─ｕ　　　　　　　　　　　　＼;;;;;;;;

0070名無し募集中。。。04/06/13 20:32ID:???

　　 ||◎▼☆ノハヽ ﾊｲ､ﾐｶﾝﾃﾞｽ　　.　　.　　ノノハヽ ﾅﾝﾃﾞｳﾁｼｯﾃﾝﾉ…
　　（　99　ﾉﾉ*＾ｰ＾)　　　　　　　　　　　　　(＇v＇;从_
　　（　　[]　）)),　　つ(::::)　　　　　　　~~~-⊂　　,-、）/
.　　.￣￣￣ u─ｕ　　　　　.　　　　　　　　　(つ し' /

0071名無し募集中。。。04/06/13 20:32ID:???


　　　　　　　　　　|　　　　　.　　　　　|　　　　　　　　|　　|
　　　　　　　──|──　.　　|　／￣|￣＼　　　　　|　　|
　　　　　　　　　　|　　　　　　|/　　　.|　　　|　　.　　.|　　|
　　　　　　　＼　　　　　　　　　.　＿_|＿_／..　　.　...|　　|
＼　　　.　　　　＼　　　　　　　　　　/　　.　　.　　　〇　〇.　　／
　　＼　　　　　　　　　.　　.　　　　　　　　　　　　　　　　　　／
　　　　＼　　　　　　　　　　　　　　ｷｲﾃﾙ?ﾔｯﾎｰ!!　　　.／
　　　　　　＼　　　　　　　　　　　　　ｴﾘﾉﾎｳｶﾞｶﾜry .／
　　　　　　　　　　　　　　　　　　　ww　　　　.　　.　　　　　　oノハヽo ﾋﾞｯｸﾘｼﾀﾉ…
.　　　　　　　　　　　　　　　　　山　　　　　　　　　　　　　Σ(･ ｡.･*;从
　　　　　　　　　　　　　　|￣||￣￣||￣|　　　　　　　　　　　/　　つつ
　　　　　　　　　　　　　　|◎||■--||◎|　　　　　　　　　　　ヽ_）_)´
.　　　　　　　　　　　　　　￣ .￣￣ .￣

0072名無し募集中。。。04/06/13 20:33ID:???



.　　　　　　　　　　　　　　ドッカ～ン！！
.　　　.　　　　　　　　　　　γ''⌒⌒⌒ヽ
　　　　　　　　　　　　　　(⌒;;;;⌒　;;;;; ⌒)
.　　　　　　　　　　　　　(　　(⌒;;;;;　　　);;;;;)　　　　　　　　　　　　　oノハヽo
　　　　　　　　　　　　　（;;;;（　　　　　　;;;;; ） ）　　　　　　　　　　　　(･ ｡.･+从
　　　　　　　　　　　　　( 　 (;;;;;;;　　 ;;;;; ) ;;;;;.)　.　　　　　　　　　　　/.　0T0 ｶﾞｼｬ!!
.　　　　　　　　　　　　　｀ゞ ､,,;;　;;;;;　;;;,,ノ''"　　　　　　　　　　　　　u─|￣|

0073名無し募集中。。。04/06/13 20:33ID:???


.　　　　　　| .　;;;;;;;;;;;|　.　　　　　　　　　.　　　.　　　　　.｜　　　　　;;;;|
.　　　　　　|　　;;;;;;;;;;| .　　.　ハロプロショップ　　　.　　｜　　　　　;;;;|
.　　　　　　| .　;;;;;;;;;;;|.　　　.　　　　　　　　　　　.　　　.　｜　　　　　;;;;|
.　　　　　　|　　;;;;;;;;;;|　　　＿＿＿＿＿＿＿＿　　　　　|　　　き　;;;;;|
.　　　　　　| .　;;;;;;;;;;;|　　　|| .　　　　|　　　　　.||　　　　.｜　みて　;;;;;|
.　　　　　　|　　;;;;;;;;;;|　　　|| .　　　　|　　　　　.||　　　　.｜.　た　　／|
.　　　　　　|　　　;／|　　　||　　　　0|0ノハヽ☆　.　　.　｜.　で ／;;;;｜
.　　　　　　| .　／ ;;;;|　　　||　　ノﾉﾉﾍ(＾ｰ＾*从||.　　　　｜.　／　　...└─
＿＿＿＿_|／.　　　|.._..＿||＿(゜皿 ゜ 川　　）_||＿＿＿_|／
　　　　　　　　　　　　　　　　　　（　　　　つ
　　　　　　　　　　　　　　　　　　　ヽ/　/
.　.　　　　　　　　　　　　　　　　　　(___/Ｊ

0074nobodyさん04/06/21 23:15ID:???
s
0075電脳プリオン04/07/19 17:58ID:???
もうもっと軽くて渋いCGI.pmを創れましたか？
0076nobodyさん04/07/27 20:09ID:???
　　　　　　　　　　 ,.. -─ ´￣￣￣￣｀　─- ､_
　　　　　　　　　／　　　　　　　　　　　　　　　　i
　 　 　 　 　 　/　　 ,　.　　　　　　　　　　　　　　|
　　　 　 　 　　|　　ＪVし　　　　　__,,..-一､　 　　|　　　__
　　　　　　　　 L__ 　　　 _,,...ﾆｧＴ ||::::::::::::| 　 　/　,.‐'´／
　　　　　　　　　| |_>ｰ＜＿__/　|. lj:::::::::∠-一´／　 /
　　　　　　　　　｀/＿__,..-ﾆ',７　Ｔ´,.-‐'´　　／　 _,./..,すぐにあの世に送ってやるぜ
　　　　　　　　　　'┬─'´ // _／:ヽ‐ﾆｰ--‐ｼ'￣　　　＼
　　　　　　　　　　　|l＿__//／:::::::::::::::/i.　 　|l　 　 　　 　|
　　　　　　　　　　　｀`ﾆ- ´i':::::::::::::::::/ 　　 　|l.　　　 　 　|
0077nobodyさん04/07/29 01:53ID:???
a
0078 2006/02/20(月) 21:19:56ID:???
CGI::Minimalよさげ

http://www.nihongo.org/snowhare/utilities/modules/cgi-minimal/

CGI.pm (3.05) via standard CGI - 16 fetches per second
CGI::Simple (0.075) via standard CGI - 20 fetches per second
CGI::Deurl (1.08) via standard CGI - 36 fetches per second
CGI::Thin (0.52) via standard CGI - 38 fetches per second
CGI::Lite (2.02) via standard CGI - 52 fetches per second
CGI::Minimal (1.16, :preload) via standard CGI - 52 fetches per second
CGI::Minimal (1.16) via standard CGI - 66 fetches per second
cgi-lib.pl (2.18) via standard CGI - 71 fetches per second
null Perl script via standard CGI - 103 fetches per second
null C program via standard CGI - 174 fetches per second
CGI::Simple (0.075) via mod_perl - 381 fetches per second
CGI.pm (3.05) via mod_perl - 386 fetches per second
CGI::Minimal (1.16) via mod_perl - 417 fetches per second
null Perl script via mod_perl - 500 fetches per second
0079nobodyさん2006/02/20(月) 21:24:49ID:???
やっぱりそういうレスが来ると思ったよ。
都合悪くなるとすぐ CGI::Minimal なんだからｗ
ここに声高らかに宣言する。

釣れた

と(´ﾟc_,ﾟ` )
0080782006/02/21(火) 02:00:38ID:eNvBOK6K
都合悪くって何の都合？
悪いがちょっと意味わからんので説明してくれ・・・
何につられたのかもようわからんｗ
0081はろー2011/05/18(水) 10:24:10.16ID:???
こんどこそ
0082nobodyさん2011/05/18(水) 10:24:53.17ID:???
もういっかい
0083 忍法帖【Lv=40,xxxPT】(1+0：8) 【24m】 電脳プリオン ◆3YKmpu7JR7Ic 2012/10/14(日) 12:33:52.21ID:????PLT(12079)

　　∧＿∧
　 （　・∀・） 　　 　 |　| ｶﾞｶﾞｯ
　と　　　　） 　　 　 |　|
　　 Ｙ　/ノ 　　　　 .人
　　　 /　） .人　　 < 　>_∧∩
　 ＿/し'　< 　>_∧∩｀Д´）/
　（＿フ彡　Ｖ｀Д´）/　　 / ←>>58
　　　　　　　　 　 　/ ←>>62
■ このスレッドは過去ログ倉庫に格納されています