Branch Coverage

blib/lib/XML/SAXDriver/vCard.pm
Criterion Covered Total %
branch 98 140 70.0


line true false branch
56 0 1 unless ($str)
96 1 1 if ($uri =~ m[^file://])
102 1 0 unless (LWP::Simple::head($uri))
121 3 37 unless ($self->_parse_ln($_, \%card))
139 2 26 unless ($self->_parse_ln($ln, \%card))
172 4 64 if ($ln =~ /^[DHIJQVWYZ]/i) { }
4 60 elsif ($$vcard{'__isagent'}) { }
182 1 3 if ($ln =~ /^EN/i)
189 0 60 if ($ln =~ /^SOUR/i) { }
5 55 elsif ($ln =~ /^F/i) { }
4 51 elsif ($ln =~ /^N:/i) { }
4 47 elsif ($ln =~ /^NI/i) { }
4 43 elsif ($ln =~ /^PHOT/i) { }
4 39 elsif ($ln =~ /^BD/i) { }
217 0 4 $2 ? :
230 5 55 if ($ln =~ /^AD/i) { }
0 55 elsif ($ln =~ /^L/i) { }
5 50 elsif ($ln =~ /^TE/i) { }
1 49 elsif ($ln =~ /^EM/i) { }
0 49 elsif ($ln =~ /^M/i) { }
0 49 elsif ($ln =~ /^TZ/i) { }
0 49 elsif ($ln =~ /^G/i) { }
4 45 elsif ($ln =~ /^TI/i) { }
0 45 elsif ($ln =~ /^R/i) { }
0 45 elsif ($ln =~ /^L/i) { }
1 44 elsif ($ln =~ /^AG/i) { }
4 40 elsif ($ln =~ /^O/i) { }
4 36 elsif ($ln =~ /^CA/i) { }
0 36 elsif ($ln =~ /^NO/i) { }
0 36 elsif ($ln =~ /^PR/i) { }
0 36 elsif ($ln =~ /^RE/i) { }
0 36 elsif ($ln =~ /^SOR/i) { }
0 36 elsif ($ln =~ /^SOUN/i) { }
4 32 elsif ($ln =~ /^UI/i) { }
0 32 elsif ($ln =~ /^UR/i) { }
0 32 elsif ($ln =~ /^CL/i) { }
0 32 elsif ($ln =~ /^K/i) { }
0 32 elsif ($ln =~ /^X/i) { }
5 27 elsif ($ln =~ /^EN/i) { }
284 0 0 $2 ? :
291 0 1 if ($1)
342 0 0 $1 eq 'VALUE' ? :
422 4 16 if (exists $$vcard{$_})
447 4 1 if (exists $$vcard{'nickname'})
452 4 1 if (exists $$vcard{'photo'})
457 4 1 if (exists $$vcard{'bday'})
462 4 1 if (ref $$vcard{'adr'} eq 'ARRAY')
482 5 0 if (ref $$vcard{'tel'} eq 'ARRAY')
495 1 4 if (ref $$vcard{'email'} eq 'ARRAY')
507 0 5 if (exists $$vcard{'mailer'})
513 0 5 if (exists $$vcard{'tz'})
519 0 5 if (exists $$vcard{'geo'})
527 4 1 if (exists $$vcard{'title'})
532 0 5 if (exists $$vcard{'role'})
537 0 5 if (exists $$vcard{'logo'})
542 1 4 if (exists $$vcard{'agent'})
545 0 1 if ($$vcard{'agent'}{'uri'}) { }
559 4 1 if (exists $$vcard{'org'})
567 4 1 if (ref $$vcard{'categories'} eq 'ARRAY')
576 0 5 if (exists $$vcard{'note'})
581 0 5 if (exists $$vcard{'sort'})
586 0 5 if (exists $$vcard{'sound'})
591 0 5 if (ref $$vcard{'url'} eq 'ARRAY')
599 0 5 if (exists $$vcard{'key'})
614 0 103 if $$data{'cdata'}
616 0 103 if $$data{'cdata'}
628 0 4 if (!$$data{'name'} =~ /^k/ and $$data{'type'})
631 0 0 $$data{'name'} =~ /^[pl]/i ? :
637 4 0 if ($$data{'url'}) { }
655 1 10 unless $$sr_str