Branch Coverage

blib/lib/Data/Sah/Compiler/perl.pm
Criterion Covered Total %
branch 49 78 62.8


line true false branch
34 9949 211461 $i == 1 ? :
0 221410 !($ibl || $1) ? :
96 5020 40 unless $cd->{'args'}{'no_modules'}
109 3152 1908 unless $cd->{'args'}{'return_type'} eq "bool_valid"
113 0 1908 if (Data::Cmp::cmp_data($nschema, ["int", {"req", 1}, {}]) == 0)
155 0 14092 if (exists $extra_keys->{'core'})
159 0 14092 if (exists $extra_keys->{'pp'})
163 7653 6439 if ($extra_keys->{'phase'} eq "runtime")
164 0 7653 if ($cd->{'args'}{'no_modules'})
168 0 7653 if ($cd->{'args'}{'whitelist_modules'} and grep {$_ eq $name;} @{$$cd{"args"}{"whitelist_modules"};})
172 80 7573 if ($cd->{'args'}{'pp'})
173 0 80 if (not $known_modules{$name}) { }
0 80 elsif (not $known_modules{$name}{'pp'}) { }
180 40 7613 if ($cd->{'args'}{'core'})
181 0 40 if (not $known_modules{$name}) { }
0 40 elsif (not $known_modules{$name}{'core'}) { }
188 80 7573 if ($cd->{'args'}{'core_or_pp'})
189 0 80 if (not $known_modules{$name}) { }
0 80 elsif (not $known_modules{$name}{'pp'} || $known_modules{$name}{'core'}) { }
202 0 17 $import_terms && @$import_terms ? :
207 30 39 unless $mod->{'phase'} eq "runtime"
209 5 34 if $mod->{'use_statement'} and $mod->{'use_statement'} eq $use_statement
225 5020 0 $import_terms && @$import_terms ? :
230 0 330 unless $mod->{'phase'} eq "runtime"
232 330 0 if $mod->{'use_statement'} and $mod->{'use_statement'} eq $use_statement
248 80 1688 if ($cd->{'args'}{'pp'} or $cd->{'args'}{'core_or_pp'} or not eval {
0 1688 elsif ($cd->{'args'}{'core'}) { }
390 1473 9470 if ($vt eq 'undef') { }
430 1226 0 if ($dump_module eq 'Data::Dumper') { }
0 0 elsif ($dump_module eq 'Data::Dmp') { }
435 0 0 if $@
442 4663 2522 if ($mod_record->{'use_statement'}) { }
461 23455 0 if (@_) { }
491 6 4718 if ($aref) { }
508 2 220 if (ref $str eq 'Regexp') { }
512 3 217 if $@
527 0 0 unless $cd->{'args'}{'return_type'} =~ /\A(bool|str|hash)_/
534 0 0 if defined &{$subname;}
546 0 0 if $@