blib/lib/Test/Stream/Plugin/SpecDeclare.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 16 | 22 | 72.7 |
line | true | false | branch |
---|---|---|---|
28 | 36 | 0 | if ($var =~ /^([\@\%\$])/) { } |
52 | 0 | 17 | unless $hash |
87 | 0 | 36 | if $DEBUG |
103 | 0 | 5 | if $DEBUG |
109 | 0 | 5 | if $DEBUG |
125 | 11 | 30 | if ($start eq '"' or $start eq q[']) { } |
29 | 1 | elsif (my $nlen = Devel::Declare::toke_scan_word($offset, 1)) { } | |
148 | 1 | 40 | unless defined $name |
155 | 17 | 23 | if ($start eq '(') |
185 | 4 | 36 | unless $start eq '{' |
193 | 0 | 36 | if $DEBUG |