line |
true |
false |
branch |
26
|
1 |
1 |
unless defined $config |
38
|
1 |
7 |
unless defined $config |
48
|
6 |
9 |
unless (exists $self->{'_config'}) |
54
|
1 |
7 |
if exists $$config{"-$key"} |
59
|
1 |
7 |
if ($key =~ / ^ - (.+ ) /msx) |
66
|
4 |
3 |
if ($key eq '_') |
67
|
1 |
3 |
unless (exists $self->{'_config'}{'_'}) |
85
|
2 |
3 |
unless exists $self->{'_config'} and &Scalar::Util::blessed($self->{'_config'}) and $self->{'_config'}->isa('Config::Tiny') |
89
|
1 |
2 |
unless $rc |
97
|
2 |
3 |
unless exists $self->{'_config'} and &Scalar::Util::blessed($self->{'_config'}) and $self->{'_config'}->isa('Config::Tiny') |
101
|
1 |
2 |
unless defined $string |