line |
true |
false |
branch |
153
|
0 |
3 |
unless -d $self->path |
159
|
3 |
0 |
if (-e $self->fullpath) { } |
168
|
0 |
3 |
if $port and $port =~ /\d+/ |
169
|
0 |
3 |
if $debug |
170
|
0 |
3 |
if $address |
176
|
0 |
2 |
if ($self->commandline->{'port'}) |
184
|
0 |
2 |
if ($self->commandline->{'address'}) |
187
|
0 |
2 |
if ($self->address eq 'localhost') |
195
|
0 |
11 |
if ($self->commandline->{'debug'}) |
204
|
60 |
0 |
if (exists $$config{$key} and my $attr = $self->meta->get_attribute($key)) { } |
205
|
54 |
6 |
if $attr->has_write_method |
216
|
0 |
2 |
unless -d $self->path |
221
|
0 |
2 |
unless print $fh Dumper($config) |