| line |
true |
false |
branch |
|
110
|
0 |
0 |
if $key =~ tr/_/ / |
|
115
|
0 |
0 |
unless defined $self->{'template_dir'} |
|
119
|
0 |
0 |
unless -d $self->{'template_dir'} |
|
123
|
0 |
0 |
unless -e $abs_file_path |
|
127
|
0 |
0 |
unless -r $abs_file_path |
|
131
|
0 |
0 |
unless open my $fh, "<", $abs_file_path |
|
139
|
0 |
0 |
ref $context_ref->{$1} eq 'ARRAY' ? : |
|
|
0 |
0 |
$context_ref->{$1} ? : |
|
152
|
1 |
0 |
if (@other_args or not $setup or $setup ne "setup") |
|
162
|
0 |
0 |
unless (defined $ENV{'HOME'}) |
|
167
|
0 |
0 |
unless -d $ENV{'HOME'} |
|
173
|
0 |
0 |
unless (-d $template_dir) |
|
182
|
0 |
0 |
unless (-d $template_test_dir) |
|
195
|
0 |
0 |
if (-e $config_file) { } |
|
203
|
0 |
0 |
unless open my $fh, "<", $backup |
|
206
|
0 |
0 |
unless close $fh |
|
228
|
0 |
0 |
unless open my $fh, ">", $config_file |
|
229
|
0 |
0 |
unless print {$fh;} @config_info |
|
230
|
0 |
0 |
unless close $fh |
|
255
|
0 |
0 |
unless open my $fh, ">", $abs_path |
|
256
|
0 |
0 |
unless print {$fh;} $contents_of{$ref_path->[-1]} |
|
257
|
0 |
0 |
unless close $fh |
|
271
|
0 |
0 |
unless (defined $response) |
|
276
|
0 |
0 |
if $response =~ /\S/ |