Branch Coverage

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


line true false branch
121 0 0 if ($content =~ m[<title>Astronomy Tower -\s+(.*?)</title>]) { }
0 0 elsif ($content =~ m[<title>\w+ -\s+(.*?)</title>]) { }
0 0 elsif ($content =~ m[<title>(.*?)</title>]) { }
133 0 0 if ($content =~ /<!-- headerstart -->(.*?)<!-- footerstart -->/s)
137 0 0 if ($story) { }
145 0 0 if $self->{'verbose'} > 1
219 0 0 if (defined $args{'urls'})
223 0 0 if (@chapters == 1)
229 0 0 if $self->{'verbose'} > 1
251 0 0 if ($content =~ /\((Chapter \d+)\)/is) { }
279 0 0 if ($content =~ /<h1\s*class\s*=\s*"title"[^>]*>([^<]+)\s+by\s+<a/s) { }
306 0 0 if ($content =~ m["http://www.fictionalley.org/authors/\w+/">([^<]+)</a>]s) { }
0 0 elsif ($content =~ m[<h1\s*class\s*=\s*"title"[^>]*>[^<]+\s*by\s*<a href="[^"]+">([^<]+)</a>]s) { }
338 0 0 if ($content =~ m[<div class="summary" align = "center">Rating: \w+<br />\s*<i>([^<]+)</i></div>]s) { }
0 0 elsif ($content =~ m[<div class="summary"[^>]*>[\w\s]*<br />\s*<i>\s*(.*?)</i>\s*</div>]s) { }