line | % | coverage | branch |
224 | 50 | T | F | if (exists $params->{'logger'} and ref $$params{"logger"} eq "ARRAY") |
235 | 100 | T | F | if ($config_file) { } |
| 100 | T | F | elsif (my $config = 'Config::Abstraction'->new('env_prefix', "${class}__")) { } |
237 | 100 | T | F | unless ($config_dirs or -r $config_file) |
242 | 50 | T | F | if (-f $config_file) |
246 | 50 | T | F | if (my $config = 'Config::Abstraction'->new('config_dirs', $config_dirs, 'config_file', $config_file, 'env_prefix', "${class}__")) { } |
| 0 | T | F | elsif ($@) { } |
270 | 50 | T | F | if ($$params{"config_path"} and -f $$params{"config_path"}) |
278 | 100 | T | F | if (my $logger = $$params{'logger'}) { } |
| 50 | T | F | elsif ($array) { } |
279 | 50 | T | F | if ($$params{"logger"} ne "NULL") |
280 | 100 | T | F | if (ref $logger eq 'HASH') { } |
| 50 | T | F | elsif (not &blessed($logger) && $logger->isa('Log::Abstraction')) { } |
281 | 100 | T | F | if ($$logger{'syslog'}) { } |
310 | 50 | T | F | if ($array and not $$params{"logger"}{"array"}) |
315 | 100 | T | F | if defined $config_file |
337 | 100 | T | F | if ($$params{"_config_file"}) |
364 | 50 | T | F | if %_config_watchers |
367 | 100 | T | F | if (my $pid = fork) { } |
| 50 | T | F | elsif (defined $pid) { } |
390 | 100 | T | F | if (my $pid = $_config_watchers{"pid"}) |
415 | 100 | T | F | if (my $obj = $$obj_ref) |
420 | 50 | T | F | if ($@) |
427 | 50 | T | F | unless @$objects |
448 | 50 | T | F | if (-f $config_file) { } |
453 | 100 | T | F | if (not $stored_stat or $current_stat->mtime > $stored_stat->mtime) |
464 | 100 | T | F | if ($changes_detected) |
465 | 50 | T | F | if ($^O ne "MSWin32") |
468 | 50 | T | F | if (my $parent_pid = getppid) |
480 | 50 | T | F | unless &blessed($obj) |
488 | 100 | T | F | unless $config_file and -f $config_file |
496 | 50 | T | F | if ($config) |
507 | 50 | T | F | if $key =~ /^_/ |
509 | 100 | T | F | if ($key =~ /^logger/ and $$new_params{$key} ne 'NULL') { } |
518 | 50 | T | F | if ($obj->can("_on_config_reload")) |
523 | 50 | T | F | if ($$obj{"logger"} and $$obj{"logger"}->can("info")) |
534 | 50 | T | F | if (ref $logger_config eq 'HASH') { } |
538 | 0 | T | F | if ($$logger_config{'syslog'}) { } |
576 | 100 | T | F | if (not defined $_original_usr1_handler) |
580 | 50 | T | F | if $^O eq "MSWin32" |
585 | 100 | T | F | if ($_config_watchers{"callback"}) |
590 | 50 | T | F | if (ref $_original_usr1_handler eq 'CODE') { } |
| 0 | T | F | elsif ($_original_usr1_handler eq 'DEFAULT') { } |
| 0 | T | F | elsif ($_original_usr1_handler eq 'IGNORE') { } |
| 0 | T | F | elsif ($_original_usr1_handler ne 'DEFAULT' and $_original_usr1_handler ne 'IGNORE') { } |
618 | 100 | T | F | if (defined $_original_usr1_handler) |
619 | 50 | T | F | if $^O ne "MSWin32" |