Branch Coverage

blib/lib/WWW/FetchStory/Fetcher/RestrictedSection.pm
Criterion Covered Total %
branch 0 30 0.0


line true false branch
103 0 0 if $self->{'verbose'} > 1
106 0 0 if ($content =~ m[<td id="page_content">(.*?)</td></tr>\s*<tr class="inverse" id="page_footer">]s)
111 0 0 if ($story) { }
121 0 0 if $title eq $chapter
122 0 0 if $chapter eq ""
168 0 0 if ($args{'url'} =~ /file=(\d+)/) { }
0 0 elsif ($args{'url'} =~ /story=(\d+)/) { }
207 0 0 if (defined $args{'urls'})
211 0 0 if (@chapters == 1)
213 0 0 if ($args{'url'} =~ /file.php/) { }
225 0 0 if $self->{'verbose'} > 1
249 0 0 if ($content =~ m[<a href="story\.php\?story=\d+">([^<]+)</a>]m) { }
0 0 elsif ($content =~ m[<title>\s*RestrictedSection\.org\s*-\s*Story Info\s*-\s*([^<]+)\s*</title>]is) { }
0 0 elsif ($content =~ m[<title>\s*RestrictedSection\.org\s*-\s*([^<]+)\s*</title>]is) { }
283 0 0 if ($content =~ m[<a href="author\.php\?author=\d+">([^<]+)</a>]) { }