![[PukiWiki]](http://osask.net/w/image/pukiwiki.png "[PukiWiki]")
- 現在との差分[1] を表示
- ソース[2] を表示
- OsaskMlList[3] へ行く。
1: 2003-12-04 (木) 23:09:00  [5] |
|||
|---|---|---|---|
| Line 1: | Line 1: | ||
| + | *OSASK-ML のURLとナンバーへのリンクCGI | ||
| + | MLへのリンクができないとつまんないので、つくってみた。Rubyですにょ。 | ||
| + | |||
| + | *スクリプト | ||
| + | #!/usr/local/bin/ruby | ||
| + | |||
| + | require 'net/http' | ||
| + | require 'cgi' | ||
| + | |||
| + | cgi = CGI.new | ||
| + | par = [] | ||
| + | todaystr = Time.now.strftime("%Y%m%d") | ||
| + | a = true | ||
| + | |||
| + | Dir.glob("\.\/????????.txt").each do |f| | ||
| + | if "./#{todaystr}.txt" == f then | ||
| + | a = false | ||
| + | else | ||
| + | File.delete(f) | ||
| + | end | ||
| + | end | ||
| + | |||
| + | if a then | ||
| + | |||
| + | Net::HTTP.start( 'www.afis.to', 80 ) {|http| | ||
| + | response , = http.get('/~mone/osask/osask_ml/index.html') | ||
| + | response.body.split("\n").each{|pul| | ||
| + | if /HREF=\"(\d{6})\/\"\>/ =~ pul then | ||
| + | par << $1 | ||
| + | end | ||
| + | } | ||
| + | } | ||
| + | |||
| + | open("./#{todaystr}.txt", "w") do |f| | ||
| + | par.each { |pname| | ||
| + | Net::HTTP.start( 'www.afis.to', 80 ) {|http| | ||
| + | response , = http.get("/~mone/osask/osask_ml/#{pname}/index.html") | ||
| + | response.body.split("\n").each{|pul| | ||
| + | if /HREF=\"msg(\d{5})\.html\"\>\[(?:OSASK|osask) (\d+)\] (.+)\<\/A\>/ =~ pul then | ||
| + | surl = "http://www.afis.to/~mone/osask/osask_ml/#{pname}/msg#{$1}.html" | ||
| + | smid = "[OSASK #{$2}]" | ||
| + | smti = "#{$3}" | ||
| + | f << $2 + "\t" + surl + "\n" | ||
| + | end | ||
| + | } | ||
| + | } | ||
| + | } | ||
| + | end | ||
| + | end | ||
| + | |||
| + | returl = "" | ||
| + | inn = cgi['n'].to_s | ||
| + | |||
| + | if inn then | ||
| + | open("./#{todaystr}.txt") do |f| | ||
| + | while f.gets | ||
| + | if /(\d+)\t(.+)$/ =~ $_ then | ||
| + | returl = $2 if $1 == inn | ||
| + | end | ||
| + | end | ||
| + | end | ||
| + | end | ||
| + | |||
| + | if returl != "" then | ||
| + | print cgi.header({"Location" => returl }) | ||
| + | print "転送 >> #{returl}" | ||
| + | else | ||
| + | cgi.out{"みつからない～ぐへぇ・・・"} | ||
| + | end | ||
| + | |||
| + | *何に使うんだ？ | ||
| + | |||
| + | WikiからML発言ナンバーでリンクしたくて・・・それだけです。・・・最近Rubyネタばっかりだな 笑 | ||
- OsaskMlList のバックアップ一覧[6]
- OsaskMlList のバックアップ差分(No. All)
- 1: 2003-12-04 (木) 23:09:00
- 2: 2006-02-04 (土) 19:59:05[7]
- 3: 2006-02-04 (土) 19:59:54[8]
- 4: 2006-03-25 (土) 22:45:03[9]
- 現: 2024-01-08 (月) 12:58:49[10] ゲスト
Links list
(This host) = http://osask.net
- (This host)/modules/osaskwiki/index.php?cmd=backup&pgid=156&age=1&action=nowdiff
- (This host)/modules/osaskwiki/index.php?cmd=backup&pgid=156&age=1&action=source
- (This host)/modules/osaskwiki/156.html
- (This host)/modules/osaskwiki/index.php?cmd=backup&pgid=156&action=diff&age=2
- (This host)/modules/osaskwiki/?cmd=backup&pgid=156&action=source&age=1
- (This host)/modules/osaskwiki/index.php?cmd=backup&pgid=156
- (This host)/modules/osaskwiki/index.php?cmd=backup&action=diff&pgid=156&age=2
- (This host)/modules/osaskwiki/index.php?cmd=backup&action=diff&pgid=156&age=3
- (This host)/modules/osaskwiki/index.php?cmd=backup&action=diff&pgid=156&age=4
- (This host)/modules/osaskwiki/index.php?cmd=backup&action=diff&pgid=156&age=Cur