■

ExtractMailer.rb:
mh形式のメールフォルダのメールからX-Mailerヘッダを取得し、表示するRubyスクリプト。出力をsortして、さらにuniqで処理することを想定している。
最後のコメントアウトは、getMailerのテスト用。

require "mailparser"
mailboxdir = "C:/Documents and Settings/jam/Application Data/Sylpheed/Mailboxes/Mail/"
def getMailer(mail)

  File.open(mail) {|f|

    m = MailParser.parse_message f

    ma = m[:header]["x-mailer"]

    next if ma == nil || ma.length == 0

    #puts m[:from][0] + ": " + m[:header]["x-mailer"][0]

    puts m[:header]["x-mailer"][0] + ": " + m[:from][0]

  }

end
def getMailers(mailboxdir)

  Dir.foreach(mailboxdir) {|de|

    #puts "### #{mailboxdir} ###"

    next if de == "." || de == ".."

    if File.stat(mailboxdir + '/' + de).ftype == "directory"

      getMailers(mailboxdir + '/' + de)

    end

    next if !(/^[1-9][0-9]*$/ =~ de)

    getMailer(mailboxdir + '/' + de)

  }

end
getMailers(mailboxdir)

#getMailer(mailbox + '/' + "23")