コーディング
頭の中にあるものをひたすらコードに落としていく作業。当面の間必要なぶんのデータは取得できるようになったから、明日はこれをRDBに書き込むところから書き始める予定。
追記
インターフェースがまずいかなぁ。というか、あからさまにおかしい。あとでもう少し手を入れないと。もう一枚レイヤをはさんで扱うくらいにした方がいいかも。統一されたインターフェースで取得できるほうが幸せになれる気がする。あとスカラーたくさんよりもハッシュ1個にまとめたほうが、DBICに食べさせるときに少し幸せになれる。
my $obj = Hoge->new($_) or die $!; my %attr; @attr{qw/foo bar baz/} = $obj->get(qw/foo bar baz/); my $i = $schema->resultset('fuga')->find_or_create(\%attr);
んー、こんなのかなぁ。