mksieve-info-list.rb

#!/usr/pkg/bin/ruby

#puts 'require "fileinto";'

if ARGV[0] =~ /^\+(.*)/
  folder = $1
  ARGV.shift
else
  folder = "INBOX.01.000Informative";
end

header = "from"
doif = "elsif"

a = Array.new
ARGF.each {|p|
  p.chomp!
  p.sub!(/^\s+/, "")
  p.sub!(/#.*/, "")

  if p != "" then
    a.push(p)
  end
}

puts "#{doif} anyof("+ a.collect {|i| "header :contains [\"#{header}\"] [\"#{i}\"]"}.join(",\n     ") + "  ) {"
    puts "     fileinto \"#{folder}\";"
    puts "}"