Condition Coverage

blib/lib/Business/DE/KontoCheck.pm
Criterion Covered Total %
condition 46 75 61.3


and 3 conditions

line !l l&&!r l&&r condition
116 0 0 212 $self->_validBLZ($$self{'BLZ'}) and $self->_validKONTONR($$self{'KONTONR'})
204 0 7720 0 $mode eq 'BANK' and $line =~ /^\d{8}.$blz/
212 0 68 145 $Business::DE::KontoCheck::CACHE_ON && $$Business::DE::KontoCheck::cache{$blz}{'METHOD'}
288 137 0 1 $m eq '27' and $k > 999999999
121 3 3 $m eq '41' and substr(sprintf('%010s', $k), 3, 1) == 9
118 6 0 $m eq '45' and substr(sprintf('%010s', $k), 0, 1) == 0 || substr(sprintf('%010s', $k), 4, 1) == 1
109 1 1 $m == 56 and $k =~ /^9\d{9}/
483 5 0 0 $d >= 96 and $d <= 99
533 0 2 0 $k >= 400000000 and $k <= 499999999
558 2 1 0 $k ge 9300000000 and $k lt 9400000000
2 0 1 $k ge 9700000000 and $k lt 9800000000

or 2 conditions

line l !l condition
98 2 0 $args{'MODE_BLZ_FILE'} || 'BANK'
159 0 0 $$self{'MODE_BLZ_FILE'} || 'BANK'
196 213 0 $$self{'MODE_BLZ_FILE'} || 'BANK'
629 114 27 $pruefziffer ||= 0
647 11 173 $$args{'M'} ||= 0
651 1456 386 $$array[$x] || 0

or 3 conditions

line l !l&&r !l&&!r condition
204 213 0 7720 $line =~ /^$blz/ or $mode eq 'BANK' and $line =~ /^\d{8}.$blz/
244 0 0 0 $Business::DE::KontoCheck::STORABLE ||= Storable::retrieve($file)
288 2 2 133 $m eq '28' or $m eq '34'
3 1 2 substr(sprintf('%010s', $k), 0, 1) == 0 || substr(sprintf('%010s', $k), 4, 1) == 1
1 0 111 $m == 52 or $m == 53
483 3 0 5 $d <= 50 or $d == 91
3 0 5 $d <= 50 or $d == 91 or $d >= 96 and $d <= 99
0 1 4 $d <= 50 or $d == 91 or $d >= 96 and $d <= 99 or $k =~ /^[78]{6}/
589 0 0 0 substr($k, 3, 1) == 5 or substr($k, 3, 2) eq 69
648 1 0 183 $$args{'M'} == 52 or $$args{'M'} == 53