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

質問

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

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

http://yahoo.co.jp

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

回答No.2

pick52 · ベストアンサー

他の掲示板や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

お礼

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

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

回答No.1

noname#190095

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です。

お礼

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

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