| blib/lib/Object/Exercise.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 18 | 44.4 |
| line | true | false | branch |
|---|---|---|---|
| 33 | 5 | 0 | if $_[0] eq $package |
| 49 | 0 | 1 | if ($arg =~ /^-k/) { } |
| 0 | 1 | elsif ($arg =~ /^-v/) { } | |
| 1 | 0 | elsif ($arg =~ /^-b/) { } | |
| 0 | 0 | elsif ($arg =~ /^-e/) { } | |
| 59 | 1 | 0 | index($_[0], '-') ? : |
| 65 | 0 | 0 | index($_[0], '-') ? : |
| 75 | 4 | 1 | unless %exportz |
| 79 | 0 | 5 | if $Object::Exercise::verbose |