| lib/Devel/Trepan/CmdProcessor/Command.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 16 | 56.2 |
| line | true | false | branch |
|---|---|---|---|
| 35 | 0 | 13 | $name =~ /::/ ? : |
| 83 | 2235 | 0 | index('$@', $sigil) >= 0 ? : |
| 84 | 1788 | 447 | if ($sigil eq '$') { } |
| 447 | 0 | elsif ($sigil eq '@') { } | |
| 95 | 224 | 223 | @ary ? : |
| 100 | 447 | 0 | if $short_help |
| 109 | 2 | 0 | unless $opts |
| 182 | 0 | 0 | if defined $self->{'short_help'} |