line |
!l |
l&&!r |
l&&r |
condition |
41
|
0 |
0 |
0 |
defined $ON and $ON ne '' |
202
|
28 |
0 |
0 |
$DEBUG > 1 and $LOGGING |
214
|
65 |
0 |
0 |
$DEBUG > 3 and pos $_ |
216
|
0 |
0 |
0 |
$LOGGING and print LOG "\$_ is all white space or else empty\n" |
283
|
14 |
0 |
26 |
defined $loop_var and $loop_var ne '' |
298
|
0 |
0 |
40 |
defined $loop_list and $loop_list ne '' |
332
|
3 |
0 |
37 |
defined $loop_block and $loop_block ne '' |
450
|
0 |
0 |
0 |
$match eq '' and warn "${subname}: \$match is empty\n" |
507
|
26 |
0 |
11 |
defined $decl and $decl ne '' |
|
26 |
0 |
11 |
defined $decl and $decl ne '' and defined $loop_var |
|
0 |
0 |
11 |
defined $decl and $decl ne '' and defined $loop_var and $loop_var ne '' |
|
26 |
0 |
0 |
defined $decl and $decl ne '' |
|
26 |
0 |
0 |
defined $decl and $decl ne '' and !defined($loop_var) || $loop_var eq '' |
|
11 |
0 |
15 |
defined $loop_var and $loop_var ne '' |
|
11 |
15 |
0 |
defined $loop_var and $loop_var ne '' and !defined($decl) || $decl eq '' |
553
|
0 |
0 |
0 |
$DEBUG > 1 and warn "${PKG}: extracted var diff from parsed var: ", $DEBUG > 0 |
571
|
0 |
37 |
0 |
defined $decl and $decl eq 'unset' |
584
|
0 |
0 |
37 |
defined $values and $values ne '' |
589
|
0 |
15 |
22 |
defined $decl && $decl ne '' |
819
|
18 |
0 |
0 |
$DEBUG > 3 and $LOGGING |
822
|
18 |
0 |
0 |
$DEBUG > 3 and $LOGGING |
832
|
18 |
0 |
0 |
$DEBUG > 3 and $LOGGING |
864
|
14 |
0 |
4 |
defined $Prompt && $Prompt ne '' |
867
|
18 |
0 |
0 |
$DEBUG > 3 and $LOGGING |
904
|
0 |
0 |
0 |
$DEBUG > 1 and $LOGGING > 0 |
913
|
0 |
0 |
0 |
$DEBUG > 1 and $LOGGING > 0 |
1292
|
0 |
0 |
0 |
is_unix() and defined $ENV{'TERM'} |
|
0 |
0 |
0 |
is_unix() and defined $ENV{'TERM'} and not system('tput -V >/dev/null 2>&1') |
1323
|
0 |
0 |
0 |
$_TTY and print TTY "$PKG-END(): Failed to open '${cdump}' for writing, $!\n" |
1339
|
0 |
0 |
0 |
defined $SGR0 and $SGR0 ne '' |
1340
|
0 |
0 |
0 |
$DEBUG > 1 and $LOGGING |
line |
l |
!l&&r |
!l&&!r |
condition |
42
|
0 |
0 |
0 |
$SGR0 || $OFF |
496
|
0 |
2 |
35 |
not defined $values or $values =~ /^\s*\(\s*\)\s*$/ |
507
|
0 |
0 |
0 |
!defined($loop_var) || $loop_var eq '' |
|
15 |
0 |
0 |
!defined($decl) || $decl eq '' |
533
|
0 |
2 |
35 |
not defined $codeblock or $codeblock =~ /^\s*{\s*}\s*$/ |
546
|
0 |
0 |
37 |
$default_loopvar or $loop_var =~ /^\$::\w+/ |
611
|
0 |
0 |
0 |
print PART1 $parts[0] or _DIE("failed to write to PART1\n") |
627
|
0 |
0 |
0 |
print PART2 $parts[1] or _DIE("failed to write to PART1\n") |
776
|
0 |
0 |
0 |
print PART3 $parts[2] or _DIE("failed to write to PART3\n") |
784
|
0 |
0 |
0 |
print PART4 $parts[3] or _DIE("failed to write to PART4\n") |
1300
|
0 |
0 |
0 |
`tput rmso` || `tput sgr0` |