Branch Coverage

blib/lib/Perlanet.pm
Criterion Covered Total %
branch 0 38 0.0


line true false branch
39 0 0 if -t STDOUT
183 0 0 if ($response->is_error)
189 0 0 unless (length $response->content)
199 0 0 unless $feed->title
205 0 0 if defined $_
230 0 0 if ($self->entries_per_feed and @entries > $self->entries_per_feed)
239 0 0 if ($_->issued and not $_->modified)
271 0 0 if ($self->entry_sort_order eq 'modified') { }
0 0 elsif ($self->entry_sort_order eq 'issued') { }
292 0 0 if ($self->entries and @entries > $self->entries)
315 0 0 if defined $self->title
316 0 0 if defined $self->url
317 0 0 if defined $self->description
318 0 0 if defined $self->author->{'name'}
319 0 0 if defined $self->author->{'email'}
320 0 0 if defined $self->url
321 0 0 if defined $self->url
356 0 0 if (my $body = $_->content->body)
361 0 0 if (my $summary = $_->summary->body)