From: Thadeu Lima de Souza Cascardo Date: Sun, 1 Nov 2015 01:30:11 +0000 (-0200) Subject: Use DateTime object for transaction date X-Git-Tag: v0.01~6 X-Git-Url: http://git.cascardo.eti.br/?p=cascardo%2FFinance-Bank-BR-Santander-Spreadsheet.git;a=commitdiff_plain;h=d242e79c42586081300f37be1b66e5502bae3ca9 Use DateTime object for transaction date --- diff --git a/lib/Finance/Bank/BR/Santander/Spreadsheet.pm b/lib/Finance/Bank/BR/Santander/Spreadsheet.pm index 51038ab..c48062b 100644 --- a/lib/Finance/Bank/BR/Santander/Spreadsheet.pm +++ b/lib/Finance/Bank/BR/Santander/Spreadsheet.pm @@ -19,6 +19,8 @@ use warnings; use Spreadsheet::ParseExcel::Simple; +use DateTime::Format::Strptime qw(strptime); + our $VERSION = '0.01'; sub new { @@ -47,7 +49,7 @@ sub _parse { while ($sheet->has_data) { my @line = $sheet->next_row; my $obj = { - 'date' => $line[0], + 'date' => strptime("%d/%m/%Y", $line[0]), 'name' => $line[2], 'extra' => $line[3], 'value' => $line[4],