view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

	- No functional changes.

	- Adjust to Perinci::CmdLine -> Perinci::CmdLine::Classic.


0.32    2014-12-10 (PERLANCAR)

	- No functional changes.

	- Use new name of renamed/split module SHARYANTO::String::Util ->
	  String::Indent.


0.31    2014-09-09 (PERLANCAR)

        - Update regex of Sun/Sat transaction list. There is now "DR KOREKSI
          BUNGA" (aside from "CR KOREKSI BUNGA").


0.30    2014-08-26 (SHARYANTO)

lib/Finance/Bank/ID/BCA.pm  view on Meta::CPAN

        my $tx = {};
        #$tx->{stmt_start_date} = $stmt->{start_date};

        if ($e->{date} =~ /NEXT/) {
            $tx->{date} = $stmt->{end_date};
            $tx->{is_next} = 1;
        } elsif ($e->{date} =~ /PEND/) {
            $tx->{date} = $stmt->{end_date};
            $tx->{is_pending} = 1;
        } else {
            my ($day, $mon) = split m!/!, $e->{date};
            my $last_nonpend_date = DateTime->new(
                                                  year => ($mon < $stmt->{start_date}->month ?
                                                           $stmt->{end_date}->year :
                                                           $stmt->{start_date}->year),
                                                  month => $mon,
                                                  day => $day);
            $tx->{date} = $last_nonpend_date;
            $tx->{is_pending} = 0;
        }