| line |
true |
false |
branch |
|
19
|
0 |
1 |
if ($i =~ /^(?:depth=)?(\d+)$/) { } |
|
|
0 |
1 |
elsif ($i eq 'full') { } |
|
|
0 |
1 |
elsif ($i eq 'reverse') { } |
|
|
0 |
1 |
elsif ($i eq 'stdout') { } |
|
|
0 |
1 |
elsif ($i eq 'stderr') { } |
|
|
0 |
1 |
elsif ($i =~ /^out=(.+)/) { } |
|
|
0 |
1 |
elsif ($i =~ /^in(?:=(.+))?/) { } |
|
|
0 |
1 |
elsif ($i eq 'append') { } |
|
32
|
0 |
0 |
$1 ne '' ? : |
|
40
|
0 |
1 |
if defined $Devel::CallStack::In |
|
41
|
1 |
0 |
unless defined $Devel::CallStack::Out or $Devel::CallStack::Stdout |
|
54
|
1 |
1 |
if ($Devel::CallStack::Import) |
|
56
|
0 |
1 |
if ($Devel::CallStack::Stdout) { } |
|
|
0 |
1 |
elsif ($Devel::CallStack::Stderr) { } |
|
|
1 |
0 |
elsif (defined $Devel::CallStack::Out) { } |
|
61
|
0 |
1 |
$Devel::CallStack::Append ? : |
|
62
|
0 |
1 |
unless (open OUT, "$mode$Devel::CallStack::Out") |
|
68
|
0 |
0 |
if $s =~ /Devel::CallStack/o |
|
78
|
0 |
0 |
unless (open IN, $fn) |
|
83
|
0 |
0 |
if $Devel::CallStack::Reverse |
|
107
|
0 |
0 |
if (my($p, $s) = $DB::sub =~ /^(.+)::(.+)/) |
|
109
|
0 |
0 |
if ($DB::Full) { } |
|
110
|
0 |
0 |
if (my($f, $l) = $DB::sub{$DB::sub} =~ /^(.+):(\d+)/) |
|
114
|
0 |
0 |
unless @c |
|
122
|
0 |
0 |
unless @c |
|
127
|
0 |
0 |
$DB::Reverse ? : |