line |
true |
false |
branch |
14
|
15 |
64 |
if (&any(sub {
$s->[0] eq $_;
}
, 'use', 'no') and scalar @$s > 2 and &any(sub {
$s->[1] eq $_;
}
, 'aliased', 'base', 'mixin::with', 'Mojo::Base', 'ok', 'parent', 'superclass')) |
18
|
0 |
15 |
$version ? : |
20
|
15 |
0 |
if (scalar @$s > $voffset) |
21
|
1 |
14 |
if $s->[$voffset] eq ';' |
26
|
3 |
11 |
if &any(sub {
$s->[1] eq $_;
}
, 'parent', 'superclass') |
27
|
3 |
11 |
if $s->[1] eq 'Mojo::Base' |
31
|
6 |
8 |
if $args[0] and &any(sub {
$s->[1] eq $_;
}
, 'aliased', 'mixin::with', 'Mojo::Base', 'ok') |
35
|
1 |
14 |
if ($args[$i + 1] and $args[$i + 1] =~ /^v?\d+(\.\d+)*$/) |