line |
true |
false |
branch |
55
|
0 |
3 |
unless my $parse_method = $parse_method{$input_type} |
60
|
1 |
2 |
if $eof_after_parse{$input_type} |
69
|
6 |
24 |
if ($coords[0] == 2) { } |
|
3 |
21 |
elsif ($coords[0] == 4 and $coords[1] == 0) { } |
|
15 |
6 |
elsif ($coords[0] == 3) { } |
70
|
3 |
3 |
if $rows[0][0] =~ /^\s*Pay stub for period:\s*(\S.+\S)\s*\z/s |
75
|
3 |
0 |
if $rows[0][2] =~ /\bCheck\s*#\s*(\d+)/ |
77
|
3 |
0 |
if $rows[0][2] =~ /\bDate:\s*(\S.+\S)/ |
80
|
0 |
6 |
unless defined $_ |
87
|
9 |
6 |
if ($rows[0][-1] =~ /^\s*YTD\s*\z/) { } |
|
3 |
3 |
elsif ($rows[0][0] =~ /^\s*Net\s+This\s+Check:/) { } |
93
|
0 |
69 |
unless defined $_ |
104
|
0 |
6 |
unless defined $_ |
134
|
0 |
2 |
unless $sum eq $net_deposit |
138
|
2 |
0 |
if length $$paystub{'check_number'} |
145
|
2 |
0 |
if length $memo |
151
|
6 |
2 |
if length $$split[2] |
168
|
0 |
8 |
unless ($$values{$current} // 0) != 0 |
170
|
0 |
8 |
unless $$fields{$field} |
179
|
0 |
3 |
unless $$a[1] cmp $$b[1] |