| File: | local/lib/perl5/Sub/Install.pm |
| Coverage: | 18.2% |
| line | % | coverage | condition | ||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 23 | 50 |
| &Scalar::Util::reftype($_[0]) || '' | ||||||||||||
| 0 |
| &Scalar::Util::blessed($_[0]) and overload::Method($_[0], '&{}') ? $_[0] : undef | |||||||||||||
| 43 | 33 |
| $$arg{'as'} ||= _name_of_code($$arg{'code'}) | ||||||||||||
| 97 | 0 |
| $$arg{'default'} || $warn |