Branch Coverage

blib/lib/autodie/Util.pm
Criterion Covered Total %
branch 20 22 90.9


line true false branch
36 110 28 unless (defined $stack)
50 60 121 if ($proto =~ /^\s* (?: [;] \s*)? \@/x)
58 117 276 if $seen_semi
59 13 380 if $proto =~ s/^\s*\\([\@%\$\&])//
60 264 116 if $proto =~ s/^\s*([_*\$&])//
61 48 68 if $proto =~ s/^\s*(;\s*)?\@//
62 68 0 if $proto =~ s/^\s*;//
79 3 5 if (@args and $args[-1] =~ /[\@#]_/) { }
102 0 4 if $E
153 19395 6473 unless defined *$oldglob{$slot}
157 3660 2807 if ($sub_ref)