Branch Coverage

blib/lib/WebDyne/Constant.pm
Criterion Covered Total %
branch 27 42 64.2


line true false branch
575 0 51 if ($^O =~ /MSWin[32|64]/) { }
586 20 31 unless ($ENV{'WEBDYNE_CONF'})
601 0 9 if ($ENV{'PAR_TEMP'})
655 4 57 if (-f $local_constant_fn and not $WebDyne::Constant::Constant{'WEBDYNE_CONF_HR'}{$local_constant_fn}++)
668 2 5004 if (defined $ENV{$key})
678 0 61 if (my $server_or = &server_or())
682 0 0 if exists $constant_class{$key}
699 9 52 unless (exists $WebDyne::Constant::Package{'server_or'})
709 0 9 if ($MP_version) { }
723 0 0 if $@
730 0 0 if $@
739 0 0 if ($@)
775 0 51 if (($local_constant_fn ||= "") eq "dump")
812 13 59 if (my $class_constant_hr = $fn_hr->{$class}) { }
870 203 0 if (my $var_test = (keys %{$constant_hr;})[0]) { }
872 138 65 if ($WebDyne::Constant::Package{'caller'}{$caller}{$constant_hr}++ and defined *{"${caller}::$var_test";}) { }
891 47 5426 if (defined $constant_hr->{$k} and $constant_hr ne $class_constant_hr)
917 961 4512 if ($caller eq $class_parent) { }
922 4230 282 if (defined *{"${class_parent}::$k";}) { }
933 3494 1979 if ($v =~ /^\d+$/) { }
950 0 51 if ($dump_fg)