| blib/lib/Siebel/Srvrmgr.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 12 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 52 | 3 | 16 | if ($ENV{'SIEBEL_SRVRMGR_DEBUG'}) { } |
| 54 | 3 | 0 | if (-e $ENV{'SIEBEL_SRVRMGR_DEBUG'} and -f $ENV{'SIEBEL_SRVRMGR_DEBUG'}) { } |
| 59 | 0 | 3 | unless open my $in, '<', $ENV{'SIEBEL_SRVRMGR_DEBUG'} |
| 107 | 52457 | 21 | if ('Log::Log4perl'->initialized) |
| 113 | 2 | 19 | unless defined $package and $package =~ /^[\w\:]+$/ |
| 116 | 0 | 19 | unless 'Log::Log4perl'->init_once(\$class->logging_cfg) |