PalmPilot 関係のRubyスクリプト
#!/usr/local/bin/ruby
# NAME:
# memo-split - PalmPilot memo data converter
# SYNOPSIS:
# memos | formail -s ruby memo-split
# DESCRIPTION:
# palm のメモデータをEUCに漢字コードを変換し、一行目の文字列を
# URLエンコードしたファイル名で保存するスクリプト
require 'cgi'
require 'nkf'
# ファイルを展開したいディレクトリ
MemoDir = './memo-data/'
#入力を読み込む
lines = []
readlines().each{|l| lines << NKF::nkf('-e', l)}
# カテゴリ(当面は未使用)
if lines[4] =~ /^Subject: \[([^\]]+)\] .*$/ then
category = $1
else
category = 'Unfiled'
end
# タイトル
title = CGI::escape(lines[6].chomp)
# 本文(一行目も含む)
body = lines[6..-1]
# 出力
open(MemoDir + title, 'w') do |f|
f.write(body)
end