| line |
!l |
l&&!r |
l&&r |
condition |
|
107
|
0 |
0 |
1 |
-e $_ and $opts{'-input'} = $_ |
|
113
|
0 |
11 |
4 |
$opts{'-verbose'} >= 2 and $opts{'-verbose'} != 99 |
|
137
|
26 |
0 |
0 |
$Pod::Usage::Config{'versiononly'} and $Pod::Usage::Config{'startperl'} =~ /\Q$version\E$/ |
|
143
|
3 |
19 |
4 |
not $opts{'-noperldoc'} and $opts{'-verbose'} >= 2 |
|
|
22 |
1 |
3 |
not $opts{'-noperldoc'} and $opts{'-verbose'} >= 2 and not ref $opts{'-input'} |
|
|
20 |
1 |
2 |
not $opts{'-noperldoc'} and $opts{'-verbose'} >= 2 and not ref $opts{'-input'} and $opts{'-output'} == \*STDOUT |
|
150
|
0 |
0 |
2 |
defined $opts{'-input'} and $opts{'-input'} =~ /^\s*(\S.*?)\s*$/ |
|
166
|
0 |
0 |
0 |
defined $pager and length $pager |
|
229
|
61 |
0 |
53 |
defined $regexs[$i] and length $regexs[$i] |
|
267
|
26 |
0 |
0 |
$add and $self->{'USAGE_SELECT'} |
|
298
|
569 |
52 |
0 |
$element =~ /^head(\d+)$/ and $1 |
|
312
|
0 |
0 |
143 |
$self->{'USAGE_SELECT'} && @{$self->{'USAGE_SELECT'};} |
|
343
|
181 |
201 |
330 |
$self->{'USAGE_SKIPPING'} and not $element =~ /^over-|^[BCFILSZ]$/ |
|
373
|
0 |
0 |
0 |
$self->{'USAGE_OPTIONS'}{'-verbose'} < 2 and /^=head/ |