Branch Coverage

blib/lib/Devel/PerlySense/CallTree/Caller.pm
Criterion Covered Total %
branch 7 10 70.0


line true false branch
42 0 56 unless $self->normal_line =~ / ^ (\s*) /x
49 0 19 unless $self->caller =~ /([\w:]+)->([\w]+)/
56 0 19 unless $self->caller =~ /([\w:]+)->([\w]+)/
66 2 56 unless $self->normal_line =~ /([\w:]+)->([\w]+)/
73 2 93 unless my $id = $self->caller