| 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] |