Branch Coverage

blib/lib/Glitch.pm
Criterion Covered Total %
branch 19 28 67.8


line true false branch
13 2 3 if (keys %import)
34 1 2 unless $GLITCHES{$options{'name'}}
42 15 9 $_ =~ /(file|filepath|line|stacktrace|module)/ ? :
50 0 3 if $@
57 0 9 unless defined $struct
58 0 9 ref $struct ? :
69 3 6 if $caller[0] eq "Glitch"
72 6 0 if $caller[1] =~ m[([^/]+)$]
73 6 0 if $caller[2] =~ /(\d+)/
74 6 0 if $caller[3] =~ /([^:]+)$/
78 0 6 !($_->{'module'} =~ /^main$/) ? :
82 3 3 $_->{'sub'} ? :
84 6 0 if $_ and $_->{'module'} and $_->{'line'}
85 0 3 unless $msg->{'stacktrace'}