| blib/lib/Scalar/Validation.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 22 | 33 | 66.6 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 657 | 0 | 36 | 2 | $message_store && $mode |
| 1018 | 18 | 86 | 506 | $parent_is_valid and $$rule_ref{-'where'}() |
| line | l | !l | condition |
|---|---|---|---|
| 558 | 5 | 0 | shift() || '' |
| 626 | 0 | 12 | par('message_text', 'Scalar', shift()) || 'extra parameters found' |
| 650 | 0 | 5 | shift() || 0 |
| 655 | 2 | 36 | shift() || '' |
| 729 | 11 | 1 | npar(-'message', -'Optional', 'CodeRef', \%call_options, sub { "rule '${rule_name}': message" . _defined_or_not_message($_, " is not a code reference: $_"); } ) || sub { "Value $_ is not valid for rule '${rule_name}'"; } |
| 968 | 780 | 1 | shift() || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 503 | 6 | 0 | 18 | $arg eq 1 or $arg eq 0 |
| 657 | 36 | 0 | 2 | not $message_store && $mode or $mode ne '-clear' |
| 733 | 0 | 12 | 0 | npar(-'name', -'Optional', 'String', \%call_options) || $rule_name |
| 734 | 0 | 0 | 12 | npar(-'description', -'Optional', 'String', \%call_options) || "Rule $rule_name" |
| 1012 | 98 | 513 | 0 | $message_ref || $$rule_ref{-'message'} |