| line |
true |
false |
branch |
|
38
|
0 |
4 |
if (not defined $msg[0]) { } |
|
|
1 |
3 |
elsif ($msg[0] =~ /^return=(.+)$/s) { } |
|
|
1 |
2 |
elsif ($msg[0] =~ /^type=(.+)$/s) { } |
|
|
0 |
2 |
elsif ($msg[0] =~ /^size=(.+)$/s) { } |
|
|
1 |
1 |
elsif ($msg[0] =~ /^trace=(.+)$/s) { } |
|
74
|
0 |
1 |
if (length $line > $size) { } |
|
78
|
1 |
0 |
length ' ' x ($size - length($line) - 3) > 0 ? : |
|
87
|
0 |
0 |
unless ($return or $^S) |
|
107
|
2 |
0 |
if (not $package) { } |
|
110
|
0 |
0 |
$hasargs ? : |
|
|
0 |
0 |
$subroutine eq '(eval)' && $evaltext ? : |
|
117
|
0 |
2 |
if (@out) |
|
119
|
0 |
0 |
$i > 0 ? : |
|
123
|
0 |
0 |
$ll > 0 ? : |
|
|
0 |
0 |
$rr > 0 ? : |
|
|
0 |
0 |
$ev ? : |
|
142
|
0 |
0 |
if (ref $SIG{'__WARN__'} eq 'CODE') { } |
|
158
|
0 |
0 |
if (ref $SIG{'__DIE__'} eq 'CODE') { } |
|
164
|
0 |
0 |
unless $^S |
|
174
|
0 |
1 |
if (grep {$_ eq ":control";} @args) |
|
185
|
0 |
1 |
if (grep {$_ eq ":control";} @args) |