七行プログラミング (452ﾚｽ)

七行プログラミング http://medaka.5ch.net/test/read.cgi/php/1036141603/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞

---

130: nobodyさん [sage] 03/04/19 00:20 ID:??? >>128 日本語まともに表示できるようにしたら、URL リンク外してもはみだしちゃった。 #!/usr/bin/perl use CGI':all';open F,'+<F';eval{flock F,2};[<F>];$.++;*i=*param;if($_=i T){s/< /＆lt;/gx;$h='<a href="';s!(＆gt;＆gt;\d+)!$h#R$1">$1</a>!g;s/\n/br/eg;$m=i M;seek F,0,2;print F dt("$. ：".b(a{name=>"R$.",$m&&(href=>"mailto:$m")},i(N)|| '名無しさん'),'：'.localtime),dd($_.br.br),"\n"}*x=*textfield;$c='Shift_JIS'; seek F,0,0;put header(-charset=>$c),start_html(-encoding=>$c,-lang=>'ja', -style=>'body{background:#eee}b{color:green}'),dl(<F>),hr,startform,p(submit( '書き込む'),' 名前：',x(N),' E-mail：',x(M),br,textarea(T,'',5,70,1)),endform, end_html CGI.pm は 2.91 と 2.46 で確認。＆を戻して使って下され。 http://medaka.5ch.net/test/read.cgi/php/1036141603/130

---

ﾒﾓ帳

(0/65535文字)

---

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

---

あと 322 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.004s