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

---

288(1): 04/03/17 17:15 ID:??? AA×


[240|320|480|600|100%|JPG|べ|ﾚｽ栞|ﾚｽ消]
288: [sage] 04/03/17 17:15 ID:??? 汎用 TSV ヴューア #!/usr/local/bin/perl use CGI":all";charset$C='EUC-JP';*P=*param;($f=P(f))=~/[^\w*\-.?\[\\\]]/&¨$ w=P(w)||"\t";chomp(@l=map{open(_)?grep(/\Q$w/,<_>):()}grep/$f/o&&-f,<*>)if$f;%l =(f,"target file regex",w,"search word",o,"output file name");put(($o=P(o))?( "Content-Type: text/tab-separated-values\nContent-Disposition: attachment;file" ."name=$o\n\n",@l):(header,start_html(-title=>'7tsview',encoding,$C,lang,ja), table({border,1},Tr[map{td[split/\t/]}@l]),startform(0,url),p(map{$l{$_}, textfield($_,'',40).br}f,w,o),endform,end_html)) http://medaka.5ch.net/test/read.cgi/php/1036141603/288
汎用 ヴューア

---

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

---

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

---

ぬこの手 ぬこTOP 0.025s