| line |
!l |
l&&!r |
l&&r |
condition |
|
63
|
0 |
0 |
0 |
$cpos == 1 and ref $cmd |
|
|
0 |
0 |
0 |
$cpos == 1 and not $cmd =~ /^[\+-]/ |
|
|
0 |
0 |
0 |
$cmd =~ /^([+-])(.*)$/ and $OptionsMap{$2} |
|
71
|
0 |
0 |
0 |
@_ and not $_[0] =~ /^-/ |
|
75
|
0 |
0 |
0 |
@_ and ref $_[0] |
|
78
|
0 |
0 |
0 |
@_ and not $_[0] =~ /^-/ |
|
84
|
0 |
0 |
0 |
@_ and ref $_[0] |
|
87
|
0 |
0 |
0 |
@_ and not $_[0] =~ /^-/ |
|
97
|
0 |
0 |
0 |
$toggle eq '-' and @_ |
|
|
0 |
0 |
0 |
$toggle eq '-' and @_ and $_[0] =~ /^(?:[10]|ON|OFF|TRUE|FALSE)$/i |
|
186
|
0 |
0 |
0 |
$aname =~ /^\@(\w+)$/ and $aname eq $args[-1] |
|
193
|
0 |
0 |
0 |
$aname =~ /^\%(\w+)$/ and $aname eq $args[-1] |
|
310
|
0 |
0 |
0 |
$aname =~ /^\@(\w+)$/ and $aname eq $args[-1] |
|
317
|
0 |
0 |
0 |
$aname =~ /^\%(\w+)$/ and $aname eq $args[-1] |
|
384
|
0 |
0 |
0 |
$symcache{join $;, $pkg, $ref} and *{$symcache{join $;, $pkg, $ref};}{'CODE'} eq $ref |
|
387
|
0 |
0 |
0 |
*{$_;}{'CODE'} and *{$_;}{'CODE'} eq $ref |
|
400
|
0 |
0 |
0 |
@oa and shift @oa ne $pkg |
|
401
|
0 |
0 |
0 |
@oa and shift @oa ne 'Class::MethodVars::_ATTRS' |
|
443
|
0 |
0 |
0 |
@oa and shift @oa ne $tpkg |
|
444
|
0 |
0 |
0 |
@oa and shift @oa ne 'Class::MethodVars::_ATTRS' |
|
446
|
0 |
0 |
0 |
@oa and $next = $oa[0]->can('import') |
|
461
|
1 |
0 |
2 |
@oa and shift @oa ne caller |
|
462
|
1 |
0 |
0 |
@oa and shift @oa ne 'Class::MethodVars::_ATTRS' |
|
464
|
1 |
0 |
0 |
@oa and $next = $oa[0]->can('import') |