| blib/lib/Pod/Simple/HTMLBatch.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 30 | 84 | 35.7 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 58 | 0 | 0 | 0 | defined $ARGV[1] and length $ARGV[1] |
| 137 | 0 | 0 | 1 | defined $outdir and length $outdir |
| 156 | 0 | 1 | 0 | not $progress and $self->verbose > 0 |
| 1 | 0 | 0 | not $progress and $self->verbose > 0 and $self->verbose <= 5 | |
| 583 | 0 | 0 | 0 | not $name =~ /\?/ and $name =~ m[([^/]+)$]s |
| 609 | 0 | 0 | 11 | ref $chunk->[-1] and $url =~ /^(_[-a-z0-9_]+\.css$)/ |
| 644 | 0 | 0 | 121 | $chunk and @$chunk |
| 770 | 0 | 0 | 1 | ref $script->[-1] and $url =~ /^(_[-a-z0-9_]+\.js$)/ |
| 809 | 0 | 0 | 11 | $s and @$s |
| line | l | !l | condition |
|---|---|---|---|
| 121 | 1 | 0 | $self ||= 'Pod::Simple::HTMLBatch' |
| 133 | 0 | 0 | $Config::Config{'path_sep'} || ':' |
| 307 | 1 | 0 | $self->_contents_filespec($outdir) || (return) |
| 333 | 1 | 0 | $self->contents_page_start || '' |
| 384 | 1 | 0 | $self->contents_page_end || '' |
| 484 | 10 | 0 | $page->html_header_after_title || '' |
| 500 | 10 | 0 | $page->html_footer || '' |
| 588 | 0 | 11 | $media ||= 'all' |
| 589 | 0 | 11 | $content_type ||= 'text/css' |
| 696 | 7 | 2 | $4 || '' |
| 754 | 0 | 1 | $content_type || 'text/javascript' |
| 792 | 1 | 0 | $self->_javascript || (return) |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 71 | 0 | 1 | 0 | ref $_[0] || $_[0] |
| 82 | 0 | 1 | 0 | $Pod::Simple::HTMLBatch::HTML_EXTENSION || $Pod::Simple::HTML::HTML_EXTENSION |
| 101 | 1 | 0 | 0 | eval { do { $new->VERSION } } || $Pod::Simple::HTMLBatch::VERSION |
| 0 | 1 | 0 | $ENV{'SOURCE_DATE_EPOCH'} || time | |
| 124 | 0 | 0 | 1 | not defined $dirs or $dirs eq '' |
| 0 | 0 | 1 | not defined $dirs or $dirs eq '' or $dirs eq '@INC' | |
| 150 | 0 | 1 | 0 | $self->{'_batch_start_time'} ||= time |
| 232 | 0 | 10 | 0 | $outfile ||= do { my(@n) = @namelets; $n[-1] .= $Pod::Simple::HTMLBatch::HTML_EXTENSION || $Pod::Simple::HTML::HTML_EXTENSION; $self->filespecsys->catfile($outdir, @n) } |
| 234 | 0 | 10 | 0 | $Pod::Simple::HTMLBatch::HTML_EXTENSION || $Pod::Simple::HTML::HTML_EXTENSION |
| 371 | 0 | 10 | 0 | $Pod::Simple::HTMLBatch::HTML_EXTENSION || $Pod::Simple::HTML::HTML_EXTENSION |
| 663 | 0 | 132 | 0 | $url =~ m[^\./] || !($url =~ m[[/\:]]) |