| line |
true |
false |
branch |
|
10
|
0 |
7 |
unless $$self{'string'} |
|
34
|
3 |
0 |
unless defined $$self{'tolerant'} |
|
41
|
2 |
31 |
if ($self->_business_check_match) |
|
42
|
2 |
29 |
if ($self->_personal_check_match) |
|
43
|
2 |
27 |
if ($self->_unknown_check_match) |
|
63
|
0 |
26 |
if ($self->clean_runs > $self->max_clean_runs) |
|
67
|
5 |
21 |
if ($self->clean_runs == 0) { } |
|
|
4 |
17 |
elsif ($self->clean_runs == 1) { } |
|
|
4 |
13 |
elsif ($self->clean_runs == 2) { } |
|
|
4 |
9 |
elsif ($self->clean_runs == 3) { } |
|
|
3 |
6 |
elsif ($self->clean_runs == 4) { } |
|
69
|
1 |
4 |
if ($t ne 'T') |
|
72
|
1 |
4 |
if ($u ne 'U') |
|
75
|
0 |
5 |
if ($a ne 'X') |
|
78
|
0 |
5 |
if ($d ne 'D') |
|
96
|
3 |
0 |
if ($$self{'string'} =~ /(T[0123456789TUXD]+U)/) { } |
|
|
0 |
0 |
elsif ($$self{'string'} =~ /(U[0123456789TUXD]+U[0123456789TUXD]*)/) { } |
|
129
|
2 |
31 |
if ($string =~ /(U[\dD]+U)[\-_\s]*(T\d{9}T)[\-_\s]*([\dD ]+U[\-_\s]*[\dD ]*)/) |
|
144
|
2 |
29 |
if ($string =~ /(T\d{9}T)[\-_\s]*([\dD ]+U\s*[\dD ]+)/) |
|
159
|
0 |
29 |
if ($self->get_check_type) |
|
166
|
26 |
3 |
unless $self->clean_runs > $self->max_clean_runs |
|
170
|
0 |
3 |
unless ($self->tolerant) |
|
180
|
0 |
3 |
if ($t ne 'T') |
|
183
|
0 |
3 |
if ($u ne 'U') |
|
186
|
0 |
3 |
if ($a ne 'X') |
|
189
|
0 |
3 |
if ($d ne 'D') |
|
199
|
0 |
3 |
if ($string =~ s/(U[\dD]+U)//) |
|
204
|
2 |
1 |
if ($string =~ s/(T\d{9}T)//) |
|
209
|
0 |
3 |
if ($string =~ /[^U](\d{5,18}U[\dD]*)/) |
|
218
|
2 |
1 |
if ($match) |
|
255
|
4 |
16 |
if ($self->is_business_check) { } |
|
|
8 |
8 |
elsif ($self->is_personal_check) { } |
|
|
6 |
2 |
elsif ($self->is_unknown_check) { } |
|
264
|
0 |
6 |
$self->auxiliary_on_us ? : |
|
265
|
6 |
0 |
$self->transit ? : |
|
266
|
0 |
6 |
$self->on_us ? : |
|
277
|
1 |
9 |
unless my $micr = $self->micr |
|
282
|
9 |
0 |
$1 eq $3 ? : |
|
316
|
3 |
38 |
if $self->is_business_check |
|
317
|
4 |
34 |
if $self->is_personal_check |
|
318
|
4 |
30 |
if $self->is_unknown_check |
|
324
|
0 |
6 |
unless $type |
|
325
|
0 |
6 |
unless $type =~ /^b|^p|^u/i |
|
341
|
9 |
5 |
unless defined $$self{'auxiliary_on_us'} |
|
347
|
17 |
26 |
unless defined $$self{'on_us'} |
|
359
|
6 |
58 |
unless defined $$self{'transit'} |
|
360
|
52 |
6 |
if (defined $$self{'check_digit'}) |
|
364
|
0 |
6 |
unless $transit =~ /T(\d{1})(\d{4})(\d{4})T$/ |
|
375
|
1 |
6 |
unless $self->transit |
|
382
|
1 |
6 |
unless $self->transit |
|
388
|
2 |
12 |
unless $self->transit |
|
400
|
7 |
0 |
unless defined $$self{'epc'} |
|
407
|
0 |
0 |
unless defined $$self{'ammount'} |
|
418
|
0 |
7 |
if (defined $$self{'account_number'}) |
|
420
|
4 |
3 |
unless $self->on_us |
|
422
|
3 |
0 |
if ($self->on_us =~ /([\dD ]{5,19})U/) |
|
433
|
3 |
7 |
if (defined $$self{'check_number'}) |
|
438
|
1 |
6 |
if ($self->is_business_check) { } |
|
|
2 |
4 |
elsif ($self->is_personal_check) { } |
|
445
|
2 |
0 |
if ($self->on_us =~ /U\s*(\d+)/) { } |
|
456
|
3 |
1 |
if ($self->is_unknown_check) |
|
460
|
0 |
3 |
if ($self->auxiliary_on_us) { } |
|
|
0 |
3 |
elsif ($self->on_us) { } |
|
468
|
0 |
0 |
if ($self->on_us =~ /U([\d]+)/) |
|
485
|
4 |
7 |
if ($self->is_personal_check or $self->is_business_check) |