| line |
true |
false |
branch |
|
39
|
3 |
28 |
ref $attr[0] eq 'ARRAY' ? : |
|
44
|
1 |
6 |
$#spec < 1 ? : |
|
|
4 |
52 |
if ref $spec[$_] eq "Type::Tiny" |
|
|
7 |
8 |
if grep {$eye = $#spec if ref $spec[$_] eq "Type::Tiny";} 0 .. $#spec or ref $spec[-1] eq "HASH" and exists $spec[-1]{'default'} |
|
47
|
7 |
2 |
if $_ =~ /^\+/ and !$spec[0] || $spec[0] ne 'set' |
|
48
|
4 |
32 |
unless not ref $spec[0] and $spec[0] =~ /^(ro|rw|set)$/ |
|
55
|
2 |
9 |
scalar @export ? : |
|
76
|
36 |
9 |
unless $spec[0] eq "set" |
|
77
|
7 |
38 |
if (ref $spec[1] eq "Type::Tiny") |
|
79
|
7 |
27 |
ref $spec[1] eq 'CODE' ? : |
|
|
34 |
11 |
if defined $spec[1] |