Branch Coverage

blib/lib/Data/Microformat/hCard.pm
Criterion Covered Total %
branch 70 80 87.5


line true false branch
22 3 4 if ($$self{'_representative'}) { }
38 4 13 if ($representative_url)
86 5 2 if (@kids)
94 229 1 if ($_[0]->attr('class')) { }
107 0 1 if (@kids)
121 130 25 if (ref $bit eq 'HTML::Element')
125 0 130 unless $hcard_class
128 1 129 if ($hcard_class =~ /vcard/)
135 1 0 if (scalar @types > 0)
156 114 29 unless (scalar @cons > 1)
159 9 105 if ($bit->tag eq 'abbr' and $bit->attr('title')) { }
38 67 elsif ($bit->tag eq 'a' and $bit->attr('href')) { }
2 65 elsif ($bit->tag eq 'object' and $bit->attr('data')) { }
2 63 elsif ($bit->tag eq 'img') { }
165 28 10 if ($type =~ /(photo|logo|agent|sound|url)/)
168 1 27 if ($bit->attr('rel') and $bit->attr('rel') eq 'me')
176 1 1 if ($type =~ /(photo|logo|agent|sound|url)/)
183 1 1 if ($type =~ /(photo|logo|agent|sound|url)/ and $bit->attr('src')) { }
1 0 elsif ($bit->attr('alt')) { }
194 1 142 if ($type eq 'vcard') { }
10 132 elsif ($type eq 'tel') { }
7 125 elsif ($type eq 'email') { }
2 123 elsif ($type eq 'n') { }
7 116 elsif ($type eq 'adr') { }
4 112 elsif ($type eq 'geo') { }
6 106 elsif ($type eq 'org') { }
197 1 0 if ($nested_goes_here)
235 0 106 if ($@)
247 7 2 if (not $card->n and $card->fn and !$card->org || !$card->fn eq $card->org)
251 7 0 if ($arr[1])
255 0 7 if ($arr[0] =~ /\,/ and length $arr[1] == 1) { }
270 2 21 if ($card->org and ($card->fn || '') eq $card->org->organization_name)
282 10 13 if ($card->fn)
285 0 0 if ($card->org and !$card->org->organization_name eq $card->fn and not $card->n and scalar @words == 1)
304 4 13 if ($representative_url)
306 1 3 if (scalar @all_cards == 1) { }
315 1 2 if ($card->url and $card->uid and $card->url eq $card->uid and _normalize_url($card->url) eq _normalize_url($representative_url))
322 2 1 unless ($found_one)
326 1 3 if ($card->url and $card->url eq $rel_me)
336 4 13 if (wantarray) { }