Wie kann ich eine Transaktion in Perl Finance :: QIF schaffen?

Question

Ich versuche, eine Transaktion in einer QIF-Datei in Perl zu erstellen. Ich dachte, dass die Verwendung von Finance :: QIF würde lassen Sie mich eine einfache Transaktion (Beispiel zu erstellen: $ 20 bei Best Buy zu verbringen), aber ich sehe keine Möglichkeit, dies zu tun.

Hat jemand ein Beispiel oder gibt es einen Unterschied Modul, dass ich eine Transaktion erstellen verwenden?

Danke!

- Noah

Answer 1

Während die Dokumentation hat keine Beispiele für einen Datensatz zu schreiben, die Tests zu tun. Ich änderte dies aus der Testdatei:

  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;