七行プログラミング ..

---

[2ch|▼Menu]

■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
96:nobodyさん 02/11/28 06:10 >>92 成る程、そういう環境もありますか。 warning 吐きまくるのはヤだなぁと思っただけなんで、 shebang line は適宜変更でいいですかのぅ。 つか valid な HTML にはあまりこだわってませんか。 URL リンクはこうかな…。 s|(http://[\w!#-;=?-@~]+)|a{href,$1},$1|eg; >>93 困りました。:) 97:nobodyさん 02/11/28 11:46 >困りました。:) ごめん。パズルに夢中でperl -cしかチェックしてなかったｗ 書きこみ、 新規ページ作成 テスト、以後気を付けます。テスト書こうっと ＨＴＭＬの構文チェックもしてません。出力はCGI.pm任せなので、 少なくともwelformedにはなってるはずだけど・・ 7wiki.cgi 6行76桁 use CGI':all';$w='\b(([A-Z][a-z]+){2,})';$/=();$f=script_name;($p)=(path_info|| FrontPage)=~/$w/;opendir D,".";if(open F,($m=param z)?">$p":$p){eval{flock F,2} ;eval{truncate F,0};seek F,0,0;print F$m||=<F>;close F}$_=pre CGI::escapeHTML($ m).hr.ul map{li"".localtime((stat)[9]),$_}sort{-M$a<=>-M$b}grep/$w$/,readdir D; s|$w|(!-f$1&&$1).a{href,"$f/$1"},-f$1?$1:"?"|eg;put header,start_html($p),h1($p ),startform(0,"$f/$p").textarea(z,$m,6,60),br,submit.endform.hr.$_,end_html

---

次ページ

最新レス表示

スレッドの検索

類似スレ一覧

話題のニュース

おまかせリスト

▼オプションを表示

レスジャンプ

mixiチェック！

Twitterに投稿

オプション

しおりを挟む

スレッドに書込

スレッドの一覧

暇つぶし2ch

---

5388日前に更新/211 KB
担当:undef