line |
!l |
l&&!r |
l&&r |
condition |
107
|
0 |
0 |
1 |
-e $_ and $opts{'-input'} = $_ |
113
|
0 |
6 |
3 |
$opts{'-verbose'} >= 2 and $opts{'-verbose'} != 99 |
137
|
20 |
0 |
0 |
$Pod::Usage::Config{'versiononly'} and $Pod::Usage::Config{'startperl'} =~ /\Q$version\E$/ |
143
|
0 |
17 |
3 |
not $opts{'-noperldoc'} and $opts{'-verbose'} >= 2 |
|
17 |
0 |
3 |
not $opts{'-noperldoc'} and $opts{'-verbose'} >= 2 and not ref $opts{'-input'} |
|
17 |
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
|
52 |
0 |
38 |
defined $regexs[$i] and length $regexs[$i] |
267
|
20 |
0 |
0 |
$add and $self->{'USAGE_SELECT'} |
298
|
506 |
29 |
0 |
$element =~ /^head(\d+)$/ and $1 |
312
|
0 |
0 |
104 |
$self->{'USAGE_SELECT'} && @{$self->{'USAGE_SELECT'};} |
343
|
141 |
197 |
272 |
$self->{'USAGE_SKIPPING'} and not $element =~ /^over-|^[BCFILSZ]$/ |
373
|
0 |
0 |
0 |
$self->{'USAGE_OPTIONS'}{'-verbose'} < 2 and /^=head/ |