IO::Adapter の改造 [用語] KEY = STR * = ステータス [改造の要点] 1) getline() して split() しているコードは get_next_value() で ARRAY_REF として受けとるように変更 2) address -> # address したい場合は replace(key, \@argv) を使って行なう。 * replace() は使ってない。 [このメソッドは使っている] get_next_key () STR add (KEY) * (KEY, STR) * ←要拡張? (KEY, []) * ←要拡張? delete (KEY) * * Mail::Delivery::SMTP でつこうてる getpos () NUM setpos (NUM) NUM eof () * [このメソッドは改良の余地なし] touch (引数なし) * [要再実装(今はとりあえず使っていない)] getline () STR ← implemented. join by space. get_value_as_str (KEY) STR ←要拡張? get_value_as_array_ref (KEY) [] ←要拡張? [ removed ] replace (KEY, STR) * ←要拡張? (KEY, []) * ←要拡張? *** TODO *** File::Sequence IO::Adapter 経由にするべきでし Tie::JournaledFile IO::Adapter で journaled file をサポートしてほしい [BUG] ? この negative cache ってまちがってないか? find() して ->{} すると negative cache が間違って有効になってるんじゃないの?