リンク: [ホーム] [自己紹介] [リンク集] [アルバム] [ソフトウェア] [発表文献] [その他]

まさおのChangeLogメモ / 2004-10-28

01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31

2004-10-28 Thu

* 科研申請書

糊付け&色塗りをした。

糊付けは、まず、糊または両面テープを貼ったものを机の上にまっすぐ置
き、貼った辺を自分から遠い側に置く。次に、自分に近い糊を貼っていな
い側の辺同士を合わせる。この際、ズレができるだけ無くなるよう、ゆっ
くりと落ち着いて合わせること。完全に真上になるように合うようになっ
たら、そっと糊付け面を合わせて、上からゆっくり擦る。

色塗りは適当。
LaTeXマクロをよく知らなかったので、色帯はマクロで付けられることを
後から知った…。不覚だ。。。次回からはLaTeX側でやろう。

* Conference Statistics

http://www.cs.ucsb.edu/%7Ealmeroth/conf/stats/
国際会議の採択率一覧。

とりあえずメモ。

* 自転車で事故を起こした時

http://www.cycle-info.bpaj.or.jp/japanese/accident/t_accident.html
とりあえずメモ。

* net/imap.rb

NIIのIMAPサーバに溜めてあるメールを1メール1ファイルのMH形式に落と
した。

最初は、Mozillaで選択して保存でいけるかと思いきや、なぜかできなかっ
たので、Rubyスクリプトを簡単なのを適当に書いてみることにした。
cf. http://www.ruby-lang.org/ja/man/index.cgi?cmd=view;name=net%2Fimap.rb

とりあえず以下のような感じ:

#!/usr/local/bin/ruby
require 'net/imap'
require 'ftools'

File.umask(0077) # 所有者以外は見れないように。。。

HOST = "mp.nii.ac.jp"
UID = "masao"
PASSWORD = "XXXXXXXXX"

OUTDIR = "/tmp/#{UID}-#{HOST}"
File.makedirs OUTDIR unless File.directory? OUTDIR

#Net::IMAP.debug = true
imap = Net::IMAP.new(HOST)
imap.login(UID, PASSWORD)
folder = imap.list("", "*")
folder.each do |d|
   dir = d.name
   imap.select(dir)
   File.makedirs "#{OUTDIR}/#{dir}" unless File.directory? "#{OUTDIR}/#{dir}"
   data = imap.fetch(1..-1, "RFC822")
   data.each do |m|
      fname = "#{dir}/#{m.seqno}"
      open("#{OUTDIR}/#{fname}", "wb") do |f|
         f.print m.attr["RFC822"].gsub(/\r$/, "")
      end
      puts fname
   end
end
imap.disconnect