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

---

231: 7ch.cgi 04/01/18 14:25 ID:??? AA×

http://.

[240|320|480|600|100%|JPG|べ|ﾚｽ栞|ﾚｽ消]
231: 7ch.cgi [sage] 04/01/18 14:25 ID:??? #!/usr/bin/perl use CGI":all";charset$C=Shift_JIS;open F,'+<F';[<F>];seek F,0,2;*i=*param;s!> ;(\d+)!a{href,"#R$1"},$&!egx,s!https?://.+!a{href,$&},$&!eg,s/\n/br/eg,($n=i(N) ||'nobodyさん')=~s/#.+/crypt$1,'◆'/e,eval{flock F,2},print F dt(++$.,'：'.b(a{ name,"R$.",i(M)&&(href,'mailto:'.i M)},$n),'：'.localtime),dd($_.p),"\n"if$_= escapeHTML i T;seek F,0,0;*x=*textfield;put$/=header,start_html(-style=>{code=> <DATA>},Title=>'7ch',encoding,$C,lang,ja),dl(<F>),hr,startform,p(submit('書き'. '込む'),' 名前：',x(N),' E-mail：',x(M),br,textarea T,'',6,70),endform,end_html __DATA__ b { color:#080 } body { background:#fff } http://medaka.5ch.net/test/read.cgi/php/1036141603/231
さん 書き 込む 名前

---

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

---

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

---

ぬこの手 ぬこTOP 0.028s