Branch Coverage

blib/lib/Tangerine/hook/list.pm
Criterion Covered Total %
branch 14 16 87.5


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+)*$/)