Use DateTime object for transaction date

[cascardo/Finance-Bank-BR-Santander-Spreadsheet.git] / lib / Finance / Bank / BR / Santander / Spreadsheet.pm

diff --git a/lib/Finance/Bank/BR/Santander/Spreadsheet.pm b/lib/Finance/Bank/BR/Santander/Spreadsheet.pm
index 51038ab..c48062b 100644 (file)
--- 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],