| blib/lib/Tie/OneOff.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 22 | 68.1 |
| line | true | false | branch |
|---|---|---|---|
| 118 | 0 | 20 | unless my($func) = our $AUTOLOAD =~ /(\w+)$/ |
| 120 | 7 | 13 | unless (ref $self) |
| 121 | 0 | 7 | unless ($func =~ /^TIE/) |
| 125 | 6 | 0 | ref $_[0] ? : |
| 1 | 6 | ref $_[0] eq 'CODE' ? : | |
| 127 | 3 | 4 | if (my $base = $$self{'BASE'}) |
| 129 | 3 | 0 | unless (&Scalar::Util::blessed($base)) |
| 131 | 0 | 3 | unless ("TIE$type" eq $func) |
| 142 | 2 | 11 | unless (my $code = $$self{$func}) |
| 143 | 0 | 2 | if $not_pass_to_base{$func} |
| 145 | 2 | 0 | if $base |