blib/lib/Devel/SimpleTrace.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 22 | 26 | 84.6 |
line | true | false | branch |
---|---|---|---|
27 | 1 | 0 | exists $options{$opt} ? : |
59 | 0 | 1 | if substr($msg, -1, 1) ne "\n" |
76 | 1 | 4 | if ref $_[0] and not $options{'showrefs'} |
77 | 2 | 2 | if index($_[0], "\n\tat ") >= 0 |
80 | 1 | 1 | if ref $args[0] |
81 | 1 | 1 | ref $_ ? : |
84 | 0 | 2 | if substr($msg, -1, 1) ne "\n" |
88 | 2 | 0 | if ($in_eval) { } |
108 | 2 | 1 | if $file =~ /(eval \d+)/ |
115 | 2 | 12 | if $context[1] =~ /(eval \d+)/ and $context[1] = '<eval>' |
116 | 6 | 8 | if $context[3] eq '(eval)' and $context[3] = '<eval>' |
123 | 1 | 16 | if $$func[1] eq '' |
124 | 16 | 1 | if $$func[2] |