七行プログラミング (452レス)
上
下
前
次
1-
新
40
(2)
: 02/11/03 14:48 ID:???
AA×
[240|
320
|
480
|
600
|
原寸
|
GIF
|
べ
|
レス栞
|
レス消
]
40: [sage] 02/11/03 14:48 ID:??? WebProg らしく。 --- cgi-lib.po --- my($m,$l,$i,$e,$x)=@ENV{'REQUEST_METHOD','CONTENT_LENGTH'};my$d=sub{$d= "Request to receive too much data: $l bytes\n";print"Content-Type: text/plain", "\n\n$d";die$d};sub ReadParse{$l>$$x?&$d:$m=~/POST/?($e=$l-read STDIN,$i,$l):( $i=$ENV{QUERY_STRING});local*I=pop;my@i=(split(/[&;]/,$i),($m?():@ARGV));for(@i ){tr/+/ /;s/%([\da-f]{2})/pack'H2',$1/egi for my($k,$v)=split/=/,$_,2;$I{$k}.= $I{$k}?"\0$v":$v}!$e&&scalar@i}${$x='cgi_lib::maxdata'}=131072 --------------- cgi-lib.pl 互換。Perl4 不可、multipart 未対応。 require 'cgi-lib.po'; $cgi_lib::maxdata = 1024; # POST 時の上限サイズ ReadParse(*in); # or ReadParse(\%in); http://medaka.5ch.net/test/read.cgi/php/1036141603/40
らしく 互換 不可 未対応 時の上限サイズ
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 412 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
ぬこの手
ぬこTOP
0.028s