テキストをHTMLに変換するソース

掲示板を作成しております。
テキストをHTMLに変換するソースサンプルを教えてください。

たとえば、こちらのサイトみたいにURLを入力すると
リンクとして表示されるサイトです。

http://yahoo.co.jp

↑のようにリンクとして表示させられればOKです。

No.2 ベストアンサー 回答者： pick52 回答日時： 2008/07/14 22:23

他の掲示板やWikiなどのスクリプトを参考にしてください...だと

不親切なので、取り敢えず簡単な方法を。

$msg = <<'HTML';
掲示板を作成しております。
テキストをHTMLに変換するソースサンプルを教えてください。

たとえば、こちらのサイトみたいにURLを入力すると
リンクとして表示されるサイトです。

http://yahoo.co.jp

↑のようにリンクとして表示させられればOKです。
HTML

$msg =~ s/([^=^\"]|^)(http\:[\w\.\~\-\/\?\&\+\=\:\@\%\;\#\%]+)/$1<a href=\"$2\" target=\"_blank\">$2<\/a>/g;

print $msg;
exit;

WebPatioからパクってみました。
Child Tree では正規表現の部分は以下のようになっていますね。

s/([^=^\"]|^)((http|ftp|https)\:[\w\.\~\-\/\?\&\+\=\:\@\%\;\#\,\|]+)/$1<a href=$2 target=$TGT>$2<\/a>/g;

より正確なURLのリンク変換は非常に難しいです。

http://www.din.or.jp/~ohzaki/perl.htm#URI
http://www.din.or.jp/~ohzaki/perl.htm#httpURL

参考URL：http://www.din.or.jp/~ohzaki/perl.htm#URI,http://www.din.or.jp/~ohzaki/perl.htm#httpURL

この回答へのお礼

回答ありがとうございました。

おかげさまで簡単にそのような機能をつけることができました。

お礼日時：2008/07/15 17:15

No.1 回答者： hfodfpow9 回答日時： 2008/07/14 22:07

perlソース

$str='リンクとして表示されるサイトです。http://yahoo.co.jp↑のようにリンクとして表示させられればOKです。';

$str =~ s/(s?https?:\/\/[-_.!~*'()a-zA-Z0-9;\/?:\@&=+\$,%#]+)/<a href="$1">$1<\/a>/g;

print $str;


結果(HTMLソース)

リンクとして表示されるサイトです。<a href="http://yahoo.co.jp">http://yahoo.co.jp</a>↑のようにリンクとして表示させられればOKです。

この回答へのお礼

回答ありがとうございました。

おかげさまで簡単にそのような機能をつけることができました。

お礼日時：2008/07/15 17:15