perl - Perl の Finance::QIF でトランザクションを作成するにはどうすればよいですか?

Question

Perl で QIF ファイルにトランザクションを作成しようとしています。Finance::QIFを使用すると、単純なトランザクション (例: Best Buy で $20 を使う) を作成できると思いましたが、これを行う方法がわかりません。

誰かに例がありますか、またはトランザクションを作成するために使用する必要がある違いのモジュールがありますか?

ありがとう！

――ノア

Answer 1

ドキュメントにはレコードを書き込む例がありませんが、テストにはあります。テストファイルからこれを変更しました：

  my $out = Finance::QIF->new( file => ">" . $somefile, );
  my $record = {
      header      => "Type:Bank",
      date        => "8/26/09",
      payee       => "Best Buy",
      memo        => "",
      transaction => "-20.00",
      address     => "",
      category    => "Entertainment",
  };
  $out->header( $record->{header} );
  $out->write($record);
  $out->close;