blib/lib/Attribute/Overload/Match.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 14 | 32 | 43.7 |
line | true | false | branch |
---|---|---|---|
16 | 0 | 477 | if $#$arg > @_ |
18 | 36 | 35 | unless $$arg[$x]($_[$x - 1]) |
33 | 0 | 2 | if ($v eq '') { } |
1 | 1 | elsif ($v =~ /^\d/) { } | |
0 | 1 | elsif ($v =~ /^'(.*)'$/) { } | |
0 | 1 | elsif ($v =~ /^[A-Z]/) { } | |
0 | 1 | elsif ($v eq '//') { } | |
1 | 0 | elsif ($v =~ /^(<|>|lt|gt|eq|==)\s*(.*)$/) { } | |
0 | 0 | elsif ($v =~ /^(ne|!=)\s*(.*)$/) { } | |
36 | 4 | 0 | if defined $_[0] |
39 | 0 | 0 | if defined $_[0] |
41 | 0 | 0 | if defined $_[0] and ref $_[0] |
46 | 0 | 1 | if $@ |
50 | 0 | 0 | if $@ |
54 | 0 | 0 | if $@ |
66 | 8 | 3 | unless exists $ops{$pkg}{$op} |