| line |
true |
false |
branch |
|
60
|
0 |
0 |
if (not $args[0] && $$dispatch{$args[0]}) { }
|
|
|
0 |
0 |
elsif ($args[0] ne 'setup' and not -e $self->{'pepper'}{'utils'}{'config_file'}) { }
|
|
157
|
0 |
0 |
if ($@) { }
|
|
168
|
0 |
0 |
if ($current_timestamp =~ /^\d{4}\-\d{2}\-\d{2}\s/u) { }
|
|
|
0 |
0 |
elsif (not $result_message) { }
|
|
179
|
0 |
0 |
if ($mode eq 'setup' and $result_message =~ /ERROR/u)
|
|
191
|
0 |
0 |
unless (-d $self->{'pepper_directory'})
|
|
196
|
0 |
0 |
unless -d $subdir_full
|
|
232
|
0 |
0 |
if (-e $utils->{'config_file'})
|
|
236
|
0 |
0 |
if $utils->{'config'}{$key}
|
|
244
|
0 |
0 |
if ($config->{'url_mappings_database'}) { }
|
|
257
|
0 |
0 |
if ($config->{'use_database'} eq 'Y')
|
|
274
|
0 |
0 |
if $t_file eq 'pepper.psgi'
|
|
278
|
0 |
0 |
if -e $dest_file
|
|
299
|
0 |
0 |
unless (-e "$html_example_handler")
|
|
323
|
0 |
0 |
if ($utils->{'config'}{'url_mappings_table'})
|
|
336
|
0 |
0 |
if ($args[1] and $args[2]) { }
|
|
355
|
0 |
0 |
if ($module_path[1])
|
|
358
|
0 |
0 |
if ($part ne $module_path[-1])
|
|
360
|
0 |
0 |
unless (-d $directory_path)
|
|
372
|
0 |
0 |
if (not -e $module_file) { }
|
|
400
|
0 |
0 |
if ($args[1]) { }
|
|
416
|
0 |
0 |
if ($utils->{'config'}{'url_mappings_table'})
|
|
444
|
0 |
0 |
if ($utils->{'config'}{'url_mappings_table'}) { }
|
|
|
0 |
0 |
elsif ($utils->{'config'}{'url_mappings_file'}) { }
|
|
468
|
0 |
0 |
unless ($urls[0])
|
|
490
|
0 |
0 |
if (not $args[1]) { }
|
|
510
|
0 |
0 |
if ($res->status_line eq '200 OK') { }
|
|
530
|
0 |
0 |
if ($prompt_key =~ /database/u and $results->{'use_database'} eq 'N')
|
|
538
|
0 |
0 |
if ($prompt_set->[2])
|
|
539
|
0 |
0 |
if ($prompt_set->[0] =~ /password/iu) { }
|
|
547
|
0 |
0 |
if ($prompt_set->[0] =~ /password/iu and not $prompt_set->[2]) { }
|
|
|
0 |
0 |
elsif ($prompt_set->[0] =~ /password/iu) { }
|
|
|
0 |
0 |
elsif ($prompt_set->[1] =~ /required/iu and not $prompt_set->[2]) { }
|
|
561
|
0 |
0 |
if ($prompt_set->[1] =~ /Y or N/u)
|
|
563
|
0 |
0 |
unless ($results->{$prompt_key} =~ /^(Y|N)$/u)
|
|
583
|
0 |
0 |
if $args[2]
|
|
585
|
0 |
0 |
if ($args[0] eq 'start') { }
|
|
|
0 |
0 |
elsif ($args[0] eq 'stop') { }
|
|
|
0 |
0 |
elsif ($args[0] eq 'restart') { }
|