Condition Coverage

blib/lib/Dios.pm
Criterion Covered Total %
condition 95 146 65.0


and 3 conditions

line !l l&&!r l&&r condition
129 143 0 284 length $params and $params =~ s/\A \s*+ $PARAMETER_SYNTAX //ux
156 149 26 1 not @params and $kind eq 'method'
180 1 0 15 defined $param->{'type'} && $param->{'type'} =~ /\S/u
236 15 1 defined $param->{'constraint'} and not defined $param->{'type'} && $param->{'type'} =~ /\S/u
207 251 1 0 substr($param->{'var'}, 1) eq '_' and $param->{'namedvar'} ne '*@_'
210 68 77 107 $first_param and $kind eq 'method'
145 18 89 $first_param and $kind eq 'method' and $param->{'terminator'} ne ':'
216 157 42 53 $first_param and $param->{'terminator'}
42 35 18 $first_param and $param->{'terminator'} and $param->{'terminator'} eq ':'
241 0 2 0 exists $param->{'name'} and $param->{'sigil'} ne '@'
346 0 120 36 exists $param->{'name'} and exists $param->{'default_type'}
347 26 1 9 $param->{'default_type'} eq '//=' and $param->{'sigil'} eq '$'
389 0 58 2 exists $param->{'name'} and exists $param->{'default'}
435 0 1 0 $special eq 'alias' && $] < 5.022
463 371 2 0 $special eq 'alias' && $] < 5.022
471 10 0 0 $special eq 'alias' && $] < 5.022
481 3 0 0 $special eq 'alias' && $] < 5.022
498 0 2 0 $special eq 'alias' and $] < 5.022
537 2 0 0 $special eq 'alias' and $] < 5.022
543 2 0 0 $special eq 'alias' && $] >= 5.022
752 29 1 0 $constraint and not defined $type
800 15 15 0 $sigil =~ /[\@%]/u and !$initializer || $initializer =~ /\A \s*+ \z/msux
845 1 2 0 $constraint and not defined $type
866 4 1 0 $constraint and not defined $type
1164 1 2 0 $parameter_list and not $parameter_list =~ /^\(\s*+\)$/u
1211 0 0 0 $parameter_list and not $parameter_list =~ /^\(\s*+\)$/u

or 2 conditions

line l !l condition
102 226 0 $^H{'Dios invocant_name'} // '$self'
186 5 14 $param->{'sigil'} ||= '$'
219 0 18 $param->{'type'} // 'Any'
254 55 101 $param->{'type'} // 'Any'
269 40 20 $param->{'type'} // 'Any'
306 1 0 $param->{'type'} // 'value'
460 4 384 $special //= ''
534 0 2 $special //= ''
767 7 0 $type // 'Any'
8 0 $type // 'Any'
910 58 0 $multis{$subname} //= []
1044 2 61 (($opt->{'accessor'} // $opt->{'accessors'}) // $opt->{'acc'}) // 'standard'
1047 1 63 ($opt->{'invocant'} // $opt->{'inv'}) // '$self'
1049 64 1 $1 || '$'
1057 65 0 (&CORE::GLOBAL::caller(0))[3] // ''
1065 65 0 (&CORE::GLOBAL::caller(0))[3] // ''
1086 65 0 (&CORE::GLOBAL::caller(0))[3] // ''
1117 65 0 (&CORE::GLOBAL::caller(0))[3] // ''
1137 65 0 (&CORE::GLOBAL::caller(0))[3] // ''
1213 65 0 (&CORE::GLOBAL::caller(0))[3] // ''
1227 65 0 (&CORE::GLOBAL::caller(0))[3] // ''
1238 65 0 (&CORE::GLOBAL::caller(0))[3] // ''
1244 65 0 (&CORE::GLOBAL::caller(0))[3] // ''
1247 65 0 (&CORE::GLOBAL::caller(0))[3] // ''
1248 65 0 (&CORE::GLOBAL::caller(0))[3] // ''

or 3 conditions

line l !l&&r !l&&!r condition
105 0 50 176 not defined $params or $params =~ /$EMPTY_PARAM_LIST/u
514 27 9 0 $default ||= $sigil eq '$' ? 'undef' : ($sigil eq '@' ? '[]' : '{}')
800 15 0 0 !$initializer || $initializer =~ /\A \s*+ \z/msux
1044 0 2 63 $opt->{'accessor'} // $opt->{'accessors'}
2 2 61 ($opt->{'accessor'} // $opt->{'accessors'}) // $opt->{'acc'}
1047 1 1 63 $opt->{'invocant'} // $opt->{'inv'}