| line |
true |
false |
branch |
|
48
|
180 |
0 |
if $_[0] =~ /attribute may clash .+? reserved word: (\w+)/o || $_[0] =~ /^Declaration of (\w+) .+? package $pkg .+? reserved word/o and $__ATTR__{$1} |
|
77
|
0 |
186 |
unless exists $__ATTR__{$attr} |
|
81
|
0 |
186 |
if (defined(my $previous = $__PKGS__{$pkg}{$ref})) |
|
87
|
0 |
0 |
if $previous eq $attr |
|
104
|
0 |
186 |
if @unknown |
|
133
|
0 |
147 |
defined $_[0] ? : |
|
144
|
42 |
498 |
unless ($strict) |
|
145
|
0 |
42 |
if (my $wrapped = delete $__DONE__{$pkg}) |
|
166
|
0 |
9330 |
if ref $sym |
|
169
|
5987 |
3343 |
unless my $ref = *{$sym;}{'CODE'} |
|
176
|
3205 |
138 |
unless @attr |
|
182
|
138 |
0 |
if ($strict) |
|
212
|
0 |
76 |
unless my $class = shift() |
|
215
|
76 |
0 |
if ($class =~ /;/o) { } |
|
230
|
0 |
76 |
if $@ |