#!/usr/bin/perl

use 5.010;
use strict;
use warnings;

use Finance::Bank::ID::Mandiri;
use YAML;

our $VERSION = '0.27'; # VERSION

my $ibank = Finance::Bank::ID::Mandiri->new;
my $stmt = join "", <>;
print Dump $ibank->parse_statement($stmt, return_datetime_obj=>0);

1;
# ABSTRACT: Parse Bank Mandiri internet banking statement
# PODNAME: parse-mandiri-statement

__END__

=pod

=encoding utf-8

=head1 NAME

parse-mandiri-statement - Parse Bank Mandiri internet banking statement

=head1 VERSION

version 0.27

=head1 SYNOPSIS

 % parse-mandiri-statement < statement-page

=head1 DESCRIPTION

=head1 SEE ALSO

L<Finance::Bank::ID::Mandiri>

=head1 HOMEPAGE

Please visit the project's homepage at L<https://metacpan.org/release/Finance-Bank-ID-Mandiri>.

=head1 SOURCE

Source repository is at L<https://github.com/sharyanto/perl-Finance-Bank-ID-Mandiri>.

=head1 BUGS

Please report any bugs or feature requests on the bugtracker website
http://rt.cpan.org/Public/Dist/Display.html?Name=Finance-Bank-ID-Mandiri

When submitting a bug or request, please include a test-file or a
patch to an existing test-file that illustrates the bug or desired
feature.

=head1 AUTHOR

Steven Haryanto <stevenharyanto@gmail.com>

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2013 by Steven Haryanto.

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=cut
