blib/lib/Test/Trap/Builder.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 22 | 23 | 95.6 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
180 | 2 | 2 | 1 | $accessor->{'is_array'} and $iselement{$_} |
207 | 77 | 52 | 5 | $adef->{'is_leaveby'} and $trap->leaveby ne $adef->{'name'} |
355 | 327 | 1 | 7 | length ref $_ and eval { do { exists &$_ } } |
line | l | !l | condition |
---|---|---|---|
30 | 282 | 55 | $self->{' id '} or '' |
38 | 5891 | 322 | $Prop{$self->{' id '}}{$package} ||= {} |
57 | 231 | 93 | $self->Prop->{'exception'} ||= [] |
67 | 231 | 93 | $self->Prop->{'exception_function'} ||= sub { push @$exception, @_; local *@; eval { do { BEGIN {${^WARNING_BITS} = "\x14\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x05"} last TEST_TRAP_BUILDER_INTERNAL_EXCEPTION } }; exit 8; } |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
180 | 1 | 1 | 4 | $takesarg{$_} or $accessor->{'is_array'} and $iselement{$_} |
311 | 0 | 605 | 16 | tied *$globref or defined($fileno = fileno $globref) |