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