#!/usr/bin/env ruby maxlen = 8 def change_roma( roma ) roma.sub!( /shi/, 'si' ) roma.sub!( /tsu/, 'tu' ) roma.sub!( /chi/, 'ti' ) roma end def mksmalldic( inf, outf = $>, maxlen = 8 ) while inf.gets yomi, kanji = split change_roma( yomi ) next if yomi.length > maxlen outf.print "#{yomi}\t#{kanji}\n" end end if __FILE__ == $0 mksmalldic( ARGF ) end