| line |
true |
false |
branch |
|
109
|
0 |
0 |
if $key =~ tr/_/ / |
|
114
|
0 |
0 |
unless defined $self->{'template_dir'} |
|
118
|
0 |
0 |
unless -d $self->{'template_dir'} |
|
122
|
0 |
0 |
unless -e $abs_file_path |
|
126
|
0 |
0 |
unless -r $abs_file_path |
|
130
|
0 |
0 |
unless open my $fh, "<", $abs_file_path |
|
138
|
0 |
0 |
ref $context_ref->{$1} eq 'ARRAY' ? : |
|
|
0 |
0 |
$context_ref->{$1} ? : |
|
151
|
1 |
0 |
if (@other_args or not $setup or $setup ne "setup") |
|
161
|
0 |
0 |
unless (defined $ENV{'HOME'}) |
|
166
|
0 |
0 |
unless -d $ENV{'HOME'} |
|
172
|
0 |
0 |
unless (-d $template_dir) |
|
181
|
0 |
0 |
unless (-d $template_test_dir) |
|
194
|
0 |
0 |
if (-e $config_file) { } |
|
202
|
0 |
0 |
unless open my $fh, "<", $backup |
|
205
|
0 |
0 |
unless close $fh |
|
227
|
0 |
0 |
unless open my $fh, ">", $config_file |
|
228
|
0 |
0 |
unless print {$fh;} @config_info |
|
229
|
0 |
0 |
unless close $fh |
|
254
|
0 |
0 |
unless open my $fh, ">", $abs_path |
|
255
|
0 |
0 |
unless print {$fh;} $contents_of{$ref_path->[-1]} |
|
256
|
0 |
0 |
unless close $fh |
|
270
|
0 |
0 |
unless (defined $response) |
|
275
|
0 |
0 |
if $response =~ /\S/ |