| blib/lib/Polyglot.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 24 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 116 | 0 | 0 | unless @ARGV |
| 123 | 0 | 0 | if /^\s*#?$/ |
| 127 | 0 | 0 | if $Debug |
| 130 | 0 | 0 | if $Debug |
| 133 | 0 | 0 | unless exists $self->{$directive} |
| 137 | 0 | 0 | if $@ =~ /Undefined subroutine/ |
| 140 | 0 | 0 | if $ARGV eq '-' |
| 192 | 0 | 0 | if $Debug |
| 194 | 0 | 0 | unless exists $self->{$name} |
| 196 | 0 | 0 | unless defined $value |
| 259 | 0 | 0 | unless @_ |
| 263 | 0 | 0 | unless ($value eq 'on' or $value eq 'off') |