| blib/lib/Error/Pure/HTTP/Print.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 5 | 10 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 33 | 1 | 4 | if (not defined $e) { } |
| 41 | 0 | 5 | if ($$stack_ar[-1]{'class'} eq 'main' and none sub { $_ =~ /^eval '/ms unless $_ eq $EVAL; } , map({$$_{'sub'};} @{$stack_ar;})) { } |
| 42 | 5 | 5 | unless $_ eq $EVAL |
| 46 | 0 | 0 | if ($class eq 'main') |
| 49 | 0 | 0 | if ($class) |