Branch Coverage

blib/lib/Devel/DollarAt.pm
Criterion Covered Total %
branch 10 26 38.4


line true false branch
30 0 0 if (defined $err and length $err and not length $text)
49 0 3 if (ref $err and $err->isa('Devel::DollarAt::NullMessage'))
57 0 3 unless $skip
60 3 0 if ($err =~ s/^(.*) at .*?(?:<(.*)> line (\d+)|)\.\n\z/$1/s)
72 0 3 if (defined $inputline)
77 1 2 if (defined $propagated and length $propagated)
90 0 3 if (defined $this->propagated)
91 0 0 unless (length $text)
96 3 0 unless ($text =~ /\n\z/)
98 0 3 if (defined $this->inputline)
104 0 3 if $FRAME
120 0 0 if ('frame' eq $_) { }
143 0 0 unless $this->{'redispatch_points'}