Comment puis-je créer une transaction dans le financement de Perl :: QIF?

Question

Je suis en train de créer une transaction dans un fichier QIF en Perl. Je pensais que l'utilisation Finance :: QIF me permettrait créer une simple transaction (par exemple: dépenser 20 $ chez Best Buy), mais je ne vois pas une façon de le faire.

Est-ce que quelqu'un a un exemple ou est-il un module de différence que je devrais utiliser pour créer une transaction?

Merci!

- Noah

Answer 1

Alors que la documentation ne présente pas des exemples d'écriture d'un enregistrement, le Tests noreferrer font. Je l'ai modifié ce à partir du fichier de test:

  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;