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

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

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

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

243: 7wiki [] 04/02/18 20:32 ID:b6u9ly2x * Added 空投稿でPage削除 * Diet evalの{}外してみた。-1 byte #!/usr/bin/perl -w use CGI":all";charset$c='EUC-JP';$w='\b(([A-Z][a-z]+){2,})';$f=script_name;$/=( );($p)=(path_info||FrontPage)=~/$w/;($m=param z)||unlink$p;if(open F,$m?">$p":$ p){eval flock F,2;print F$m||=<F>}$_=pre(escapeHTML$m).hr.ul map{li"".localtime ((stat)[9]),$_}sort{-M$a<=>-M$b}grep/^$w$/&-f,<*>;s|$w|(!-f$1&&$1).a{href,"$f/$ 1"},-f$1?$1:"?"|eg;put header,start_html(-title=>$p,encoding,$c,lang,ja),h1($p) ,startform(0,"$f/$p"),p(textarea(z,$m,6,60),br,submit),endform,hr,$_,end_html http://medaka.5ch.net/test/read.cgi/php/1036141603/243

244: nobodyさん [sage] 04/02/19 09:30 ID:??? >>243 eval の {} は外せないですよ。 eval flock F,2; だと flock() の戻り値から成る文字列を eval する事に。 unlink の問題はあっちでも指摘されてますが。:o) http://medaka.5ch.net/test/read.cgi/php/1036141603/244

246: nobodyさん [] 04/02/19 20:30 ID:mWwpYaYp >>244 あ、なるほど。それではevalの意味がなくなってしまう。 一応、事前に実験したんですが、検証方法が間違ってました。m(_ _) フォローありがとうございます。 > unlink の問題はあっちでも指摘されてますが。:o) あぁ、やってしまったぁ。試してくれた方ありがとう&&すみません。 ひとまず >>243は無効って事で、代案考えます。 ところで、ライセンスや掲載許可みたいな事を尋ねられたのだけど、 wiki, や blosxom, はオリジナルと同じ GPL って事でいいかな？ 実際、7wikiはYukiWiki, 7blosxomは初期のblosxomを参考にしたので。 http://medaka.5ch.net/test/read.cgi/php/1036141603/246

---

ﾒﾓ帳

(0/65535文字)

---

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

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ ｱﾎﾞﾝOFF

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.028s