メーラスレッド

[過去ﾛｸﾞ] メーラスレッド (452ﾚｽ)
上下前次 1-新

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索歴削→次ｽﾚ栞削→次ｽﾚ過去ﾛｸﾞﾒﾆｭｰ

34(1): 2001/06/12(火)23:59 AAS
ruby なんだけどイイかな…

#!/usr/local/bin/ruby

require 'kconv'

class String
def escapeHTML
gsub!(/&/, %q(&))
gsub!(/</, %q(<))
gsub!(/>/, %q(>))
end
end

File.open(%(#{ENV['HOME']}/.netscape/viewurl.html), %q(w)) do |f|
f.print %q(<HTML><HEAD><TITLE>viewurl</TITLE></HEAD><BODY><PRE>)

while header = gets
break if header =~ /^$/
end

body = $stdin.read.toeuc
body.escapeHTML
body.gsub!(%r[(f|ht)tp://[^)>\s)]+], %q[<a href='\&'>\&</a>])

f.print body, %q(</PRE></BODY></HTML>)
end

# netscape must be exec'ed in advance
exec(%q(netscape),
%q(-remote),
%Q(openURL(#{ENV['HOME']}/.netscape/viewurl.html, new-window)))

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

あと 418 ﾚｽあります
ｽﾚ情報赤ﾚｽ抽出画像ﾚｽ抽出歴の未読ｽﾚ AAｻﾑﾈｲﾙ

ぬこの手ぬこTOP 0.019s