| line |
!l |
l&&!r |
l&&r |
condition |
|
107
|
0 |
0 |
0 |
-e $_ and $opts{'-input'} = $_ |
|
113
|
0 |
5 |
1 |
$opts{'-verbose'} >= 2 and $opts{'-verbose'} != 99 |
|
137
|
15 |
0 |
0 |
$Pod::Usage::Config{'versiononly'} and $Pod::Usage::Config{'startperl'} =~ /\Q$version\E$/ |
|
143
|
0 |
14 |
1 |
not $opts{'-noperldoc'} and $opts{'-verbose'} >= 2 |
|
|
14 |
0 |
1 |
not $opts{'-noperldoc'} and $opts{'-verbose'} >= 2 and not ref $opts{'-input'} |
|
|
14 |
1 |
0 |
not $opts{'-noperldoc'} and $opts{'-verbose'} >= 2 and not ref $opts{'-input'} and $opts{'-output'} == \*STDOUT |
|
150
|
0 |
0 |
0 |
defined $opts{'-input'} and $opts{'-input'} =~ /^\s*(\S.*?)\s*$/ |
|
166
|
0 |
0 |
0 |
defined $pager and length $pager |
|
229
|
42 |
0 |
33 |
defined $regexs[$i] and length $regexs[$i] |
|
267
|
15 |
0 |
0 |
$add and $self->{'USAGE_SELECT'} |
|
298
|
458 |
24 |
0 |
$element =~ /^head(\d+)$/ and $1 |
|
312
|
0 |
0 |
90 |
$self->{'USAGE_SELECT'} && @{$self->{'USAGE_SELECT'};} |
|
343
|
134 |
180 |
234 |
$self->{'USAGE_SKIPPING'} and not $element =~ /^over-|^[BCFILSZ]$/ |
|
373
|
0 |
0 |
0 |
$self->{'USAGE_OPTIONS'}{'-verbose'} < 2 and /^=head/ |