Branch Coverage

blib/lib/HTML/FormatText/WithLinks.pm
Criterion Covered Total %
branch 54 60 90.0


line true false branch
16 5 28 unless @_
30 5 28 if $$self{'base'}
54 21 309 if exists $$hash{$_}
67 120 0 unless defined $$self{'cur_pos'}
76 4 25 if ($$self{'base'} and not $$self{'doc_overrides_base'})
90 2 0 if (my $href = $node->attr('href'))
95 2 0 unless ('HTML::FormatText'->can('base_start'))
109 1 33 if ($href and $$self{'anchor_links'} == 0 and $href =~ /^#/o) { }
3 54 elsif ($href and $$self{'skip_linked_urls'} and $href eq $node->as_text) { }
115 26 8 if ($href)
116 5 21 unless ($href =~ /^https?:|^mailto:/o)
119 8 18 if ($$self{'unique_links'}) { }
121 3 5 if (defined $$self{'_link_track'}{$href}) { }
143 31 3 unless ($$self{'skip_linked_urls'} and $node->attr('href') eq $node->as_text)
144 8 23 if ($$self{'unique_links'}) { }
154 6 25 if ($text ne '')
164 4 2 if $$self{'with_emphasis'}
170 4 2 if $$self{'with_emphasis'}
176 4 2 if $$self{'with_emphasis'}
182 4 2 if $$self{'with_emphasis'}
190 16 13 if ($$self{'_links'} and @{$$self{'_links'};} and $$self{'footnote'})
208 41 36 unless defined $num
217 72 5 if ($$self{'_links'} and @{$$self{'_links'};})
218 36 36 unless defined $num and defined $href
233 1 29 unless defined $text
234 1 28 if $text eq ''
246 2 1 unless (-e $file and -f $file)
264 0 29 unless ($tree)
265 0 0 $! ? :
280 2 2 if (@_)