Branch Coverage

blib/lib/Text/vCard/Precisely/V3.pm
Criterion Covered Total %
branch 38 60 63.3


line true false branch
163 0 71 unless $method and $content
164 0 71 if (ref $content eq 'Hash') { }
0 71 elsif (ref $content eq 'Array') { }
183 0 2 unless open my $vcf, '<', $filename
187 0 2 unless $data->{'type'} eq 'VCARD'
211 5 30 if $name eq 'VERSION'
213 5 25 if ($name eq 'N') { }
5 20 elsif ($name eq 'TEL') { }
5 15 elsif ($name eq 'REV') { }
0 15 elsif ($name eq 'ADR') { }
218 5 0 unless exists $hashref->{$name}
219 0 5 if (ref $node->{'params'} eq 'ARRAY') { }
0 5 elsif (ref $node->{'param'} eq 'HASH') { }
223 0 0 if ref $node->{'params'}
256 0 15 if $content->{'param'}{'TYPE'}
257 0 15 if $content->{'param'}{'PREF'}
288 2 49 if $self->bday
289 0 51 if $self->uid
292 51 0 unless $self->encoding_out eq 'none'
300 10 76 if $self->prodid
310 0 2287 unless $method
311 255 2032 if (ref $self->$method eq 'ARRAY') { }
30 2002 elsif ($self->$method and $self->$method->isa('Text::vCard::Precisely::V3::Node::N')) { }
0 2002 elsif ($self->$method) { }
313 287 0 if ($item->isa('Text::vCard::Precisely::V3::Node')) { }
0 0 elsif ($item) { }
333 2 84 if $self->tz
334 17 69 if $self->rev
341 0 86 unless my $str = shift()
361 0 2 unless $filename