Branch Coverage

blib/lib/Class/Constructor.pm
Criterion Covered Total %
branch 48 58 82.7


line true false branch
397 0 15 if defined &{"${class}::$constructor_name";}
401 1 14 if $params{'Disable_Name_Normalization'}
402 1 14 if $params{'Disable_Case_Mangling'}
408 13 2 $normalization ? :
415 28 17 unless exists $params{$param}
416 4 13 unless ref $params{$param} eq 'ARRAY'
420 2 13 if exists $params{'Init_Method'}
421 1 14 if exists $params{'Init_Methods'}
424 14 1 if exists $params{'Auto_Init'}
428 3 12 if (exists $params{'Required_Params'})
429 3 0 if ($normalization) { }
440 6 0 unless ($auto_init{$param})
447 13 2 if ($normalization) { }
463 23 3 if ($normalization) { }
472 0 26 if (defined $dont_load_subclass_param)
473 0 0 if (exists $params{$dont_load_subclass_param} and $params{$dont_load_subclass_param})
485 18 0 if ($normalization) { }
486 12 6 if exists $normalized_params{&$param_name_normalize($required_param)}
489 0 0 if exists $params{$required_param}
493 4 22 if (@missing_required)
497 9 13 if ($subclass_param_name)
501 7 2 if ($normalization) { }
503 3 4 if (exists $normalized_params{$subclass_param_name})
509 1 1 if (exists $params{$subclass_param_name})
514 4 5 if ($subclass)
517 4 0 if ($load_subclasses)
530 40 8 $normalization ? :
531 46 2 if ($auto_init{$method}) { }
535 1 1 unless (@init_methods)