【HTML】StrictなHTMLのBBSを作ろう【Perl,PHP】 (465ﾚｽ)
上下前次1-新
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん

---

419: 2007/02/04(日)10:34 ID:nrwoc+hC(1) AAS
さっさと書いた正規表現。

my($number,$date,$name,$comment) = split(/<>/);
$comment =~ s/(<CL>){2,}/\n\t\t\t\t\t\t/sg;#改行連続を別の<p>ではさみたい(とりあえず考案中)
my @comment_lines = split(/<CL>/,$comment);
foreach(@comment_lines){
　　s/https?\:[\w\.\~\-\/\?\&\=\@\;\#\:\%]+/<a href=\"$&\">$&<\/a>/sg;
　　s/(\>\;\>\;)([0-9]+(-)?([0-9]+)?)/<a href=\"$file{'read'}\/$2\" title="$2" class="anchor">$&<\/a>/sg;
省15

---

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

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.924s*