Branch Coverage
blib/lib/Text/vCard/Precisely/Multiple.pm
Criterion
Covered
Total
%
branch
4
8
50.0
line
true
false
branch
50
0
1
unless
ref
$ref
eq
'ARRAY'
63
0
1
unless
open
my
$vcf
,
'<'
,
$filename
69
0
5
unless
$data
->{
'type'
}
eq
'VCARD'
88
0
1
unless
$filename