如何在Perl的Finance :: QIF中創建事務？

Question

我想在Perl中的QIF文件中創建一個事務。我認爲使用Finance::QIF可以讓我創建一個簡單的交易（例如：在百思買消費20美元），但我沒有辦法做到這一點。

有人有一個例子，或者是否有差異模塊，我應該用來創建一個事務？

謝謝！

--Noah

Answer 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;