| blib/lib/Polyglot.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 24 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 114 | 0 | 0 | unless @ARGV |
| 120 | 0 | 0 | if /^\s*#?$/ |
| 124 | 0 | 0 | if $Debug |
| 127 | 0 | 0 | if $Debug |
| 130 | 0 | 0 | unless exists $self->{$directive} |
| 134 | 0 | 0 | if $@ =~ /Undefined subroutine/ |
| 137 | 0 | 0 | if $ARGV eq '-' |
| 187 | 0 | 0 | if $Debug |
| 189 | 0 | 0 | unless exists $self->{$name} |
| 191 | 0 | 0 | unless defined $value |
| 251 | 0 | 0 | unless @_ |
| 255 | 0 | 0 | unless ($value eq 'on' or $value eq 'off') |