Branch Coverage

blib/lib/Statocles/App/Blog.pm
Criterion Covered Total %
branch 31 40 77.5


line true false branch
170 1 5 unless ($argv[0])
176 1 4 if ($argv[0] eq 'help') { }
3 1 elsif ($argv[0] eq 'post') { }
189 0 15 defined $opt{$_} ? :
194 3 0 unless (-t *STDIN)
203 3 0 if (-e '/dev/tty')
209 1 2 unless ($ENV{'EDITOR'} or $doc{'title'})
219 1 1 if ($opt{'date'}) { }
239 0 2 if (run_editor($full_path))
242 0 0 if ($doc{'title'} ne $old_title)
317 10 17 if (exists $page_tags{$tag})
321 192 2 if $page_flag eq '+'
334 1 54 unless @pages
540 0 377 unless $self->_post_pages
580 1 1 $self->_has_cached_post_pages ? :
583 17 6 unless $page->path =~ qr"^$root/?(\d{4})/(\d{2})/(\d{2})/[^/]+(?:/index)?[.]html$"
587 4 0 if ($attr eq 'tags')
588 3 1 unless grep {$_ eq $value;} @{$page->document->tags;}
593 1 2 if @found_pages >= $count
632 0 862 unless $Statocles::App::Blog::b->[1] cmp $Statocles::App::Blog::a->[1]