| line |
true |
false |
branch |
|
43
|
0 |
0 |
if (defined $_[1]) |
|
57
|
0 |
0 |
unless (defined $args{'scm'}) |
|
66
|
0 |
0 |
if (ref $args{'scm'} ne 'Sys::Config::Manage') |
|
88
|
0 |
0 |
unless ($self->errorblank) |
|
93
|
0 |
0 |
unless (defined $script) |
|
101
|
0 |
0 |
if ($script =~ m[/]) |
|
109
|
0 |
0 |
unless (defined $configDir) |
|
111
|
0 |
0 |
if ($$self{'scm'}->error) |
|
122
|
0 |
0 |
if ($$self{'scm'}->error) |
|
129
|
0 |
0 |
if (defined $valid) |
|
137
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
148
|
0 |
0 |
if (-f $scriptFile) |
|
150
|
0 |
0 |
unless (open $fh, '<', $scriptFile) |
|
165
|
0 |
0 |
if ($self->error) |
|
194
|
0 |
0 |
unless ($self->errorblank) |
|
199
|
0 |
0 |
unless (defined $script) |
|
207
|
0 |
0 |
if ($script =~ m[/]) |
|
215
|
0 |
0 |
unless (defined $configDir) |
|
217
|
0 |
0 |
if ($$self{'scm'}->error) |
|
228
|
0 |
0 |
if ($$self{'scm'}->error) |
|
235
|
0 |
0 |
if (defined $valid) |
|
243
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
253
|
0 |
0 |
unless (-f $scriptFile) |
|
262
|
0 |
0 |
unless (open $fh, '<', $scriptFile) |
|
289
|
0 |
0 |
unless ($self->errorblank) |
|
294
|
0 |
0 |
unless (defined $configDir) |
|
296
|
0 |
0 |
if ($$self{'scm'}->error) |
|
307
|
0 |
0 |
if ($$self{'scm'}->error) |
|
314
|
0 |
0 |
if (defined $valid) |
|
322
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
333
|
0 |
0 |
unless (-d $scriptDir) |
|
339
|
0 |
0 |
unless (opendir $fh, $scriptDir) |
|
352
|
0 |
0 |
if (-f $scriptDir . '/' . $dirEntries[$int]) |
|
388
|
0 |
0 |
unless ($self->errorblank) |
|
392
|
0 |
0 |
unless (defined $script) |
|
400
|
0 |
0 |
unless (defined $configDir) |
|
402
|
0 |
0 |
if ($$self{'scm'}->error) |
|
413
|
0 |
0 |
if ($$self{'scm'}->error) |
|
420
|
0 |
0 |
if (defined $valid) |
|
428
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
435
|
0 |
0 |
if (-f $$self{'scm'}{'baseDir'} . '/' . $configDir . '/.SysConfigManage/Scripts/' . $script) |
|
462
|
0 |
0 |
unless ($self->errorblank) |
|
466
|
0 |
0 |
unless (defined $script) |
|
474
|
0 |
0 |
unless (defined $configDir) |
|
476
|
0 |
0 |
if ($$self{'scm'}->error) |
|
487
|
0 |
0 |
if ($$self{'scm'}->error) |
|
494
|
0 |
0 |
if (defined $valid) |
|
502
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
512
|
0 |
0 |
unless (-f $scriptFile) |
|
520
|
0 |
0 |
unless (open $fh, '<', $scriptFile) |
|
552
|
0 |
0 |
unless ($self->errorblank) |
|
556
|
0 |
0 |
unless (defined $script) |
|
564
|
0 |
0 |
unless (defined $configDir) |
|
566
|
0 |
0 |
if ($$self{'scm'}->error) |
|
577
|
0 |
0 |
if ($$self{'scm'}->error) |
|
584
|
0 |
0 |
if (defined $valid) |
|
592
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
602
|
0 |
0 |
unless (-f $scriptFile) |
|
636
|
0 |
0 |
unless ($self->errorblank) |
|
640
|
0 |
0 |
unless (defined $script) |
|
647
|
0 |
0 |
if ($script =~ m[/]) |
|
654
|
0 |
0 |
unless (defined $data) |
|
662
|
0 |
0 |
unless (defined $configDir) |
|
664
|
0 |
0 |
if ($$self{'scm'}->error) |
|
675
|
0 |
0 |
if ($$self{'scm'}->error) |
|
682
|
0 |
0 |
if (defined $valid) |
|
690
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir) |
|
698
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir . '/.SysConfigManage/') |
|
699
|
0 |
0 |
unless (mkdir $$self{'scm'}{'baseDir'} . '/' . $configDir . '/.SysConfigManage') |
|
706
|
0 |
0 |
unless (-d $$self{'scm'}{'baseDir'} . '/' . $configDir . '/.SysConfigManage/Scripts/') |
|
707
|
0 |
0 |
unless (mkdir $$self{'scm'}{'baseDir'} . '/' . $configDir . '/.SysConfigManage/Scripts') |
|
719
|
0 |
0 |
if (-e $file) |
|
724
|
0 |
0 |
unless (open $fh, '>', $file) |
|
736
|
0 |
0 |
unless ($exists) |
|
737
|
0 |
0 |
if (defined $$self{'scm'}{'addCommand'}) |
|
744
|
0 |
0 |
if ($exit ne '0') |