Branch Coverage

blib/lib/Perl/Lint/Policy/TestingAndDebugging/RequireUseStrict.pm
Criterion Covered Total %
branch 15 16 93.7


line true false branch
19 1 20 if (my $this_policies_arg = $args->{'require_use_strict'})
30 11 12 if ($token_type == 93)
32 2 9 if ($next_token->{'type'} == 171)
34 2 0 if ($next_token_data >= 5.011)
45 15 9 if ($token_type == 94 or $token_type == 127 or $token_type == 126) { }
53 8 1 if (&any(sub { $_ eq $used_module; } , @marshals))
61 1 11 if ($token_type == 128)
64 1 1 if ($token->{'type'} == 106)