| line | % | coverage | branch |
|---|
| 17 | 0 | T | F | unless $name =~ /\A__ANON__/ |
| 23 | 0 | T | F | overload::Method($_[0], '&{}') ? : |
| 50 | T | F | unless (&Scalar::Util::reftype($_[0]) || '') eq 'CODE' |
| 37 | 100 | T | F | unless $$arg{$_} |
| 40 | 50 | T | F | unless $$arg{'code'} |
| 42 | 50 | T | F | if (_CODELIKE($$arg{'code'})) { } |
| 45 | 0 | T | F | unless my $code = $$arg{'from'}->can($$arg{'code'}) |
| 49 | 0 | T | F | unless $$arg{'as'} |
| 53 | 50 | T | F | unless $$arg{'as'} |
| 81 | 50 | T | F | $SIG{'__WARN__'} ? : |
| 85 | 0 | T | F | if $error =~ /$_/ |
| 88 | 0 | T | F | if (my($base_error) = $error =~ /\A($_) $eow_re/x) |
| 93 | 0 | T | F | if (my($base_error) = $error =~ /\A($_) $eow_re/x) |
| 102 | 100 | T | F | if $code |
| 168 | 0 | T | F | unless exists $is_exported{$_} |