| 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
|