Branch Coverage
blib/lib/Business/PT/BI.pm
Criterion
Covered
Total
%
branch
8
8
100.0
line
true
false
branch
72
1
14
unless my $bi = shift()
73
2
12
unless $bi =~ /^\d{8}$/
76
1
11
unless defined $control
84
1
10
if ($expected > 9)