| line |
true |
false |
branch |
|
85
|
3 |
364 |
unless $date =~ /^(\d{2})\.(\d{2})\.(\d{4})$/ |
|
93
|
3 |
401 |
unless $amount =~ /^(-?)(?:\s*\x{20AC}\s*|\s*\x{80}\s*|\s*\x{A4}\s*)?([0-9]{1,3}(?:\.\d{3})*,\d{2})(?:\s*\x{20AC}|\s*\x{80})?$/ |
|
104
|
0 |
3 |
unless open my $fh, "< $filename" |
|
114
|
15 |
12 |
unless ref $self |
|
118
|
4 |
23 |
if ($filename) { } |
|
|
4 |
19 |
elsif (not defined $raw_statement) { } |
|
122
|
1 |
3 |
unless $args{'number'} |
|
124
|
1 |
2 |
unless exists $args{'password'} |
|
131
|
1 |
21 |
unless $raw_statement |
|
135
|
1 |
20 |
unless $lines[0] =~ /^Umsatzauskunft;$/ |
|
151
|
19 |
1 |
if ($lines[0] =~ /([\t;])/) |
|
154
|
0 |
20 |
unless $tags{$account_type} |
|
155
|
4 |
69 |
unless $lines[0] =~ /^\Q$tag\E$sep(.*?)$sep?$/ |
|
162
|
1 |
35 |
if exists $safety_check{$method} and defined $self->$method and $self->$method ne $value |
|
172
|
0 |
30 |
unless $totals{$account_type} |
|
174
|
30 |
60 |
if ($line =~ /$re$sep\s*(?:(?:(\S+)\s*(?:\x{20AC}|\x{80}))|(null))$sep$/) |
|
177
|
30 |
0 |
if ($balance =~ /^(-?[0-9.,]+)\s*$/) { } |
|
|
0 |
0 |
elsif ('null' eq $balance) { } |
|
186
|
0 |
30 |
unless ($method) |
|
193
|
0 |
15 |
unless $lines[0] =~ /^\s*$/ |
|
204
|
0 |
15 |
unless $lines[0] =~ /^Buchungsdatum${sep}Wertstellung${sep}Umsatzart/ |
|
211
|
120 |
420 |
if ($col =~ /^["']?${target}["']?$/) |
|
230
|
0 |
180 |
if $line =~ /^\s*$/ |
|
232
|
0 |
180 |
unless scalar @row == scalar @fields |
|
236
|
0 |
1440 |
if /^\s*["']\s*(.*?)\s*["']\s*$/ |
|
259
|
33 |
51 |
if (exists $args{'on'}) { } |
|
262
|
1 |
1 |
if exists $args{'since'} and exists $args{'upto'} |
|
264
|
1 |
31 |
if exists $args{'since'} |
|
266
|
1 |
30 |
if exists $args{'upto'} |
|
268
|
1 |
29 |
if $args{'on'} eq 'today' |
|
269
|
0 |
30 |
unless $args{'on'} =~ /^\d{8}$/ |
|
276
|
7 |
44 |
unless $start_date =~ /^\d{8}$/ |
|
277
|
7 |
37 |
unless $end_date =~ /^\d{8}$/ |
|
278
|
2 |
35 |
unless $start_date < $end_date |
|
282
|
400 |
380 |
if $_->{'tradedate'} > $start_date |