my $self = {};
bless $self, $class;
$self->_init;
- $self->load(@_);
+ if ($self->load(@_)) {
+ return undef;
+ }
return $self;
}
if (defined($filename)) {
my $xls = Spreadsheet::ParseExcel::Simple->read($filename);
if (!defined($xls)) {
- return;
+ return 1;
}
$self->_parse($xls);
}
+ return 0;
}
sub balance {