| line |
true |
false |
branch |
|
21
|
0 |
2 |
if (defined &Pod::Simple::HTMLBatch::DEBUG) { } |
|
|
2 |
0 |
elsif (defined &Pod::Simple::DEBUG) { } |
|
53
|
0 |
0 |
unless @ARGV == 2 |
|
58
|
0 |
0 |
if (defined $ARGV[1] and length $ARGV[1]) |
|
60
|
0 |
0 |
unless -e $d |
|
61
|
0 |
0 |
unless -d $d |
|
62
|
0 |
0 |
unless -w $d |
|
111
|
0 |
10 |
if ($self->verbose) |
|
122
|
0 |
1 |
unless ref $self |
|
124
|
0 |
1 |
if (not defined $dirs or $dirs eq '' or $dirs eq '@INC') { } |
|
|
1 |
0 |
elsif (ref $dirs) { } |
|
137
|
0 |
1 |
unless defined $outdir and length $outdir |
|
156
|
0 |
1 |
if (not $progress and $self->verbose > 0 and $self->verbose <= 5) |
|
158
|
0 |
0 |
$self->verbose == 2 ? : |
|
|
0 |
0 |
$self->verbose < 2 ? : |
|
166
|
1 |
0 |
if ($dirs) { } |
|
171
|
1 |
0 |
$dirs ? : |
|
175
|
0 |
1 |
unless ($total) |
|
180
|
0 |
1 |
if $progress |
|
181
|
0 |
1 |
$total > 25 ? : |
|
191
|
0 |
1 |
if $progress |
|
204
|
0 |
10 |
if $Pod::Simple::HTMLBatch::SLEEPY |
|
215
|
0 |
1 |
if $self->progress |
|
230
|
0 |
10 |
unless @namelets |
|
249
|
10 |
0 |
if $page->can('batch_mode_page_object_init') |
|
252
|
10 |
0 |
if $self->can('batch_mode_page_object_init') |
|
258
|
0 |
10 |
if $progress |
|
260
|
10 |
0 |
if ($retval = $page->parse_from_file($infile, $outfile)) { } |
|
267
|
0 |
10 |
if $page->can('batch_mode_page_object_kill') |
|
270
|
0 |
10 |
if $self->can('batch_mode_page_object_kill') |
|
282
|
28 |
0 |
unless $_[0]{'_filespecsys'} |
|
292
|
10 |
0 |
if ($self->contents_file) |
|
316
|
1 |
0 |
if ($Contents) { } |
|
337
|
1 |
0 |
if ($css_wad) |
|
342
|
1 |
0 |
if ($javascript_wad) |
|
347
|
0 |
1 |
unless (print $Contents $starter, "\n") |
|
384
|
0 |
1 |
unless (print $Contents "\n", $self->contents_page_end || '') |
|
390
|
0 |
1 |
unless close $Contents |
|
404
|
2 |
8 |
$entry->[0] =~ /^perl\w*$/ ? : |
|
418
|
0 |
0 |
unless $fgroup->{$b} <=> $fgroup->{$a} |
|
425
|
1 |
0 |
if wantarray |
|
434
|
0 |
1 |
unless $outfile |
|
442
|
5 |
5 |
unless @$namelets > 1 |
|
445
|
2 |
3 |
if (-e $dir) |
|
446
|
0 |
2 |
unless -d $dir |
|
450
|
0 |
3 |
unless mkdir $dir, 511 |
|
482
|
0 |
10 |
if $self->no_contents_links |
|
484
|
10 |
0 |
if $self->contents_file |
|
498
|
0 |
10 |
if $self->no_contents_links |
|
500
|
10 |
0 |
if $self->contents_file |
|
538
|
0 |
1 |
if $self->progress |
|
540
|
1 |
0 |
$dirs ? : |
|
541
|
1 |
0 |
$dirs ? : |
|
543
|
0 |
1 |
unless $m2p |
|
546
|
0 |
1 |
unless keys %$m2p |
|
570
|
13 |
0 |
if open $out_fh, "> $outpath" |
|
579
|
0 |
11 |
unless $url |
|
580
|
0 |
11 |
unless ($name) |
|
583
|
0 |
0 |
if (not $name =~ /\?/ and $name =~ m[([^/]+)$]s) |
|
592
|
0 |
11 |
if ($is_default) { } |
|
602
|
0 |
1 |
unless $self->css_flurry |
|
609
|
11 |
0 |
if (ref $chunk->[-1] and $url =~ /^(_[-a-z0-9_]+\.css$)/) { } |
|
620
|
0 |
11 |
unless print $Cssout ${$chunk->[-1];} |
|
634
|
0 |
11 |
unless $self->_css_wad |
|
635
|
0 |
11 |
unless @css |
|
641
|
5 |
6 |
$depth ? : |
|
644
|
0 |
121 |
unless $chunk and @$chunk |
|
663
|
132 |
0 |
$url =~ m[^\./] || !($url =~ m[[/\:]]) ? : |
|
696
|
9 |
0 |
if $outname =~ s/^([012])([012])([[012])([a-z]*)=?//s |
|
698
|
3 |
6 |
if '010' eq join('', @swap) |
|
705
|
5 |
4 |
if ($flipmode =~ /n/) |
|
709
|
6 |
3 |
if @swap |
|
711
|
2 |
7 |
if ($flipmode =~ /a/) { } |
|
|
2 |
5 |
elsif ($flipmode =~ /b/) { } |
|
753
|
0 |
1 |
unless $url |
|
762
|
0 |
1 |
unless $self->javascript_flurry |
|
770
|
1 |
0 |
if (ref $script->[-1] and $url =~ /^(_[-a-z0-9_]+\.js$)/) { } |
|
781
|
0 |
1 |
unless print $Jsout ${$script->[-1];} |
|
800
|
0 |
11 |
unless $self->_javascript_wad |
|
801
|
0 |
11 |
unless @scripts |
|
806
|
5 |
6 |
$depth ? : |
|
809
|
0 |
11 |
unless $s and @$s |