如何在 Perl 的 Finance::QIF 中创建交易？

【问题标题】：How can I create a transaction in Perl's Finance::QIF?如何在 Perl 的 Finance::QIF 中创建交易？
【发布时间】：2010-11-23 02:46:14
【问题描述】：

我正在尝试在 Perl 的 QIF 文件中创建事务。我认为使用Finance::QIF 可以让我创建一个简单的交易（例如：在百思买花费 20 美元），但我没有看到这样做的方法。

是否有人有示例或者我应该使用不同的模块来创建事务？

谢谢！

--诺亚

【问题讨论】：

标签： perl quicken qif

【解决方案1】：

虽然文档没有任何写入记录的示例，但 tests 有。我从测试文件中修改了这个：

  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;

【讨论】：

在“8/26/09”之后需要一个逗号。除此之外它很好用！！
哎呀。更新了我的答案。谢谢。