七行プログラミング (452ﾚｽ)
上下前次1-新

---

191: 03/12/04 06:04 ID:??? AA×
>>189>>-

外部ﾘﾝｸ:.

[240|320|480|600|100%|JPG|べ|ﾚｽ栞|ﾚｽ消]
191: [sage] 03/12/04 06:04 ID:??? >>189 > charset()を使わないと、escapeHTMLで文字化け あぁ、確かに ad hoc な事やってますな…。相変わらず CGI.pm はダサい。:< #!/usr/bin/perl use CGI":all";charset$c=Shift_JIS;*i=*param;*x=*textfield;sub l{a{href,pop},pop }sub e{escapeHTML i pop}sub r{seek F,0,0}chdir G;($b=e(B)||e S)=~m![./]!&¨ open F,"+>>$b";flock F,2;r;[<F>];s!\w+://.+!l$&,$&!eg,s/\n/br/eg,print F dt($.+ 1,':'.b(l e(N)||'七氏','mailto:'.e M),':'.localtime),dd($_),"\n"if$_=e T;r;$t= 'ｽﾚ';put header,start_html(-title=>$b||$t,encoding,$c,lang,ja),startform,$b?h1( $b).dl(<F>).hidden(B,$b).l $t,'?':ol(li[map{l$_,"?B=$_"}sort{-M$a<=>-M$b}<*>]). $t.x(S),br,submit,Name,x(N),Mail,x(M),br,textarea(T,'',7,80,1),endform,end_html ・レス番号が増えないのを fix 。 ・スレタイに [./] は使用不可 (「../7thread.cgi」なんてスレ立てられると…) 。 ・gmtime は流石にどうかと思う。 ・上記改造のしわ寄せを h1 周りに。 http://medaka.5ch.net/test/read.cgi/php/1036141603/191
を使わないとで文字化け あぁ確かに な事やってますな相変わらず はダサい 七氏 レス番号が増えないのを スレタイに は使用不可 なんてスレ立てられると は流石にどうかと思う 上記改造のしわ寄せを 周りに

---

上下前次1-新書関写板覧索設栞歴

---

あと 261 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 1.218s*