| line |
true |
false |
branch |
|
130
|
0 |
0 |
if (-e $self->logfile) { } |
|
135
|
0 |
0 |
if ($@) |
|
167
|
0 |
0 |
if (defined $mode) |
|
169
|
0 |
0 |
$mode ? : |
|
170
|
0 |
0 |
$mode ? : |
|
172
|
0 |
0 |
defined $mode ? : |
|
191
|
0 |
0 |
if (defined $level) |
|
194
|
0 |
0 |
if ($level > 5) { } |
|
|
0 |
0 |
elsif ($level < 0) { } |
|
207
|
0 |
0 |
defined $level ? : |
|
227
|
0 |
0 |
if (defined $max_children) |
|
229
|
0 |
0 |
if ($max_children > 256) { } |
|
|
0 |
0 |
elsif ($max_children < 1) { } |
|
242
|
0 |
0 |
defined $max_children ? : |
|
262
|
0 |
0 |
if ($$CHILD_PROCESSES{'finished'}{$device_pid}) { } |
|
275
|
0 |
0 |
wantarray ? : |
|
307
|
0 |
0 |
if (defined $logfile) { } |
|
310
|
0 |
0 |
unless ($logfile =~ m[^/]) |
|
315
|
0 |
0 |
if (-e $logfile) { } |
|
359
|
0 |
0 |
unless $filename |
|
362
|
0 |
0 |
unless ($filename =~ m[/]) |
|
367
|
0 |
0 |
if &_file_not_usable($filename, 'device config') |
|
371
|
0 |
0 |
unless open DEVICES, $filename |
|
373
|
0 |
0 |
if ($@) |
|
387
|
0 |
0 |
if $line =~ /^#/ |
|
388
|
0 |
0 |
if $line =~ /^\s*$/ |
|
392
|
0 |
0 |
if ($line =~ /^:/) { } |
|
|
0 |
0 |
elsif ($line =~ /\s*(.*?)\s*=\s*(.*?)\s*$/) { } |
|
399
|
0 |
0 |
unless ($line) |
|
405
|
0 |
0 |
if ($line =~ /default/i) { } |
|
|
0 |
0 |
elsif ($line =~ /^end$/) { } |
|
411
|
0 |
0 |
unless ($current_device->hostname =~ /autoconfig-default/i) |
|
432
|
0 |
0 |
unless ($current_device) |
|
437
|
0 |
0 |
if ($log->is_trace) |
|
445
|
0 |
0 |
if ($value =~ /\/i) |
|
450
|
0 |
0 |
unless ($message) |
|
454
|
0 |
0 |
if ($hostname eq $default_device->hostname) |
|
471
|
0 |
0 |
wantarray ? : |
|
491
|
0 |
0 |
unless $filename |
|
494
|
0 |
0 |
unless ($filename =~ m[^/]) |
|
499
|
0 |
0 |
if &_file_not_usable($filename, 'template file') |
|
536
|
0 |
0 |
unless (ref($self) =~ /Net::Autoconfig/) |
|
542
|
0 |
0 |
unless ($devices) |
|
548
|
0 |
0 |
unless (ref $devices eq 'ARRAY') |
|
554
|
0 |
0 |
unless ($template) |
|
564
|
0 |
0 |
if ($log->is_trace) |
|
573
|
0 |
0 |
if $ZOMBIES |
|
577
|
0 |
0 |
if ($self->bulk_mode) |
|
582
|
0 |
0 |
if ($child_pid == -1) { } |
|
|
0 |
0 |
elsif ($child_pid) { } |
|
604
|
0 |
0 |
if ($device->provision) { } |
|
607
|
0 |
0 |
if ($1 and $2) { } |
|
624
|
0 |
0 |
if ($failed_ping_test) |
|
628
|
0 |
0 |
if ($self->bulk_mode) { } |
|
639
|
0 |
0 |
if $device->provision |
|
644
|
0 |
0 |
if $device->provision |
|
652
|
0 |
0 |
if ($$template{$model}) { } |
|
667
|
0 |
0 |
if ($$template{$device->hostname}) { } |
|
679
|
0 |
0 |
if ($self->bulk_mode) |
|
681
|
0 |
0 |
if ($child_pid == 0) |
|
692
|
0 |
0 |
if $ZOMBIES |
|
719
|
0 |
0 |
unless ($prompt) |
|
768
|
0 |
0 |
unless ($filename) |
|
774
|
0 |
0 |
if (-d $filename) |
|
780
|
0 |
0 |
unless (-e $filename) |
|
786
|
0 |
0 |
unless (-r $filename) |