Branch Coverage

blib/lib/Params/Sah.pm
Criterion Covered Total %
branch 35 44 79.5


line true false branch
25 3 2 if (ref $_[0] eq 'HASH') { }
31 0 5 unless $$opts{'on_invalid'} =~ /\A(croak|carp|warn|die|bool|str)\z/
35 3 2 if ($$opts{'named'}) { }
38 0 6 unless /\A[A-Za-z_]\w*\z/
53 3 2 if ($$opts{'named'}) { }
60 4 1 unless $$opts{'on_invalid'} eq 'bool'
65 6 4 if ($$opts{'named'}) { }
72 2 8 $$opts{'on_invalid'} eq 'bool' ? :
82 5 5 if $mentioned_mods{$mod}++
86 5 0 $$stmt[1] && @{$$stmt[1];} ? :
89 10 5 if $$cd{'module_statements'}{$mod}
91 0 5 if $mentioned_mods{$mod}++
95 4 4 if $mentioned_vars{$var}++
97 4 0 defined $val ? :
100 6 4 if ($$opts{'on_invalid'} =~ /\A(croak|carp|warn|die)\z/) { }
101 6 0 $$opts{'on_invalid'} =~ /\A(croak|carp)\z/ ? :
103 0 6 if $i and $$opts{'on_invalid'} =~ /\A(carp|warn)\z/
108 2 2 if ($return_type eq 'str') { }
118 1 4 if ($$opts{'on_invalid'} eq 'bool') { }
1 3 elsif ($$opts{'on_invalid'} eq 'str') { }
127 0 5 if ($DEBUG)
133 0 5 if $@