[mhc:01962] Re: WebMHC2

[knok@xxxxxxxxxxxxx]

  野首です。

At Mon, 20 Sep 2004 21:53:54 +0900,
Fumihiro Kato wrote:
> 数ヵ月前にAirH"を手に入れたため，
> Web経由でMHCを快適に使えるように，
> CGIを書いてみました．

  なかなか便利ですね。というか似たようなものを作ろうと思った矢先に公開
されたので、実装しなくてすんで喜んでいます。

  mhccat.cgiをちょっといじってURLっぽいものがlinkになるようにしてみま
した。regexはまだちょっと甘いかもしれません。
-- 
野首 貴嗣
E-mail: knok@xxxxxxxxxxxxx
	knok@xxxxxxxxxx / knok@xxxxxxxxxx

--- mhccat.cgi	2004/09/24 03:21:02	1.1
+++ mhccat.cgi	2004/09/24 03:28:52
@@ -19,6 +19,10 @@
   exit 1
 end
 
+def href(str)
+	str.gsub(/(http:\/\/[0-9a-zA-Z.+&=\?\/-]*)/, '<a href="\1">\1</a>')
+end
+
 date = $query['date'][0]
 
 type = ($query['type'][0]) ? $query['type'][0] : 'html'
@@ -61,7 +65,7 @@
 <pre>
 EOT
 
-  print Kconv::tojis(CGI::escapeHTML(Kconv::toeuc(data)))
+  print Kconv::tojis(href(CGI::escapeHTML(Kconv::toeuc(data))))
 
   print <<EOT
 </pre>