Branch Coverage

blib/lib/Benchmark/DKbench.pm
Criterion Covered Total %
branch 151 172 87.7


line true false branch
364 0 1 if $^O =~ /android/
369 1 0 if $arch
376 1 0 if $physical and $physical > 1
377 1 0 if $cores
378 0 1 if $cores and $cores != $ncpu
379 1 0 if @extra
387 1 5 if $opt->{'datapath'}
390 4 2 $opt->{'time'} ? :
396 2 4 unless $opt->{'no_mce'}
399 4 4 if $opt->{'iter'} > 1
403 2 3 if $opt->{'iter'} > 1
412 1 1 $opt->{'time'} ? :
413 1 1 $opt->{'time'} ? :
419 40 2 unless $stats1->{$bench}{'times'} and $stats2->{$bench}{'times'}
423 2 0 if $res2[2]
424 2 0 if $res2[2]
444 5 3 $opt->{'time'} ? :
446 3 5 unless $opt->{'time'}
450 2 166 if $opt->{'skip_bio'} and $bench =~ /Monomers/
451 2 164 if $opt->{'skip_prove'} and $bench =~ /prove/
452 6 158 if not $opt->{'bio_codons'} and $bench =~ /Codons/
453 6 152 if not $opt->{'time_piece'} and $bench =~ /Time::Piece/
454 2 36 if $opt->{'ver'} and $benchmarks->{$bench}[5] and $opt->{'ver'} < $benchmarks->{$bench}[5]
455 6 144 if $opt->{'exclude'} and $bench =~ /$opt->{'exclude'}/
456 121 23 if $opt->{'include'} and not $bench =~ /$opt->{'include'}/
457 0 23 if ($bench =~ /Bio/)
468 21 2 $opt->{'time'} ? :
469 13 10 if $res ne "Pass"
471 2 21 unless $opt->{'time'}
473 0 23 if $opt->{'sleep'}
475 1 7 unless $i
477 5 2 $opt->{'time'} ? :
485 3 20 unless $opt->{'quick'}
486 22 1 if $opt->{'no_mce'}
500 2 0 if $_->[1] ne "Pass"
513 10 12 $out eq $benchmark->[0] ? :
649 50000 450000 if $_ % 10 == 1
687 0 40 unless length $bytes > length $str
689 26 14 rand 1 > 0.25 ? :
692 0 40 unless $cp eq $str
705 1 1 unless open my $fh, "<:raw", catfile($datadir, "M31.bmp")
710 0 4 unless my $img = "Imager"->new("data", $data, "type", "bmp")
747 0 600 unless compare_obj($obj, $obj2)
781 0 250 if $data_in eq $data_out . $extra
790 0 250 if $data_in eq $data_out . $extra
824 130 1170 if $_ % 10 == 1
828 130 1170 if $_ % 10 == 1
830 130 1170 if $_ % 10 == 1
834 130 1170 if $_ % 10 == 1
839 130 1170 if $_ % 10 == 1
879 1 1 if ($iter < 1) { }
885 2 0 if ($result =~ /Result: (\w*)/) { }
965 7 21 if $sz > 1000
984 0 75000 if $t->year < 1970
996 1 1 $opt->{'time'} ? :
997 1 1 $opt->{'time'} ? :
999 1 1 unless $opt->{'time'}
1002 40 2 unless $stats->{$bench}{$display}
1007 1 1 unless $opt->{'time'}
1024 1 23 unless @$arr
1030 1 7 unless @$arr
1046 30 13 if ($single) { }
1047 28 2 unless $single * ($_ - $avg) > 2 * $stdev
1049 11 2 unless abs $avg - $_ > 2 * $stdev
1065 0 12 unless open my $fh, "<:$enc", catfile($datadir, "wiki$_.html")
1074 12 5252 $abc ? :
1082 40695 5608 if $chr > 127
1083 21337 24966 if $chr > 591
1099 8377 8100 if ($p > 0.5) { }
4922 3178 elsif ($p > 0.2) { }
1104 1532 1646 $p > 0.1 ? :
1128 1 28701 if $t1 ne $t2
1129 25205 3496 unless $t1
1130 1459 2037 $t1 eq 'ARRAY' ? :
1136 1 1460 if $sz != scalar @$arr2
1138 1 8155 unless compare_obj($arr1->[$_], $arr2->[$_])
1145 1 2038 if scalar keys %$h1 != scalar keys %$h2
1147 1 19944 unless compare_obj($h1->{$_}, $h2->{$_})
1157 434 413 rand 1 < 0.5 ? :
7356 847 rand 1 < 0.9 ? :
1168 1034 1031 rand 1 < 0.5 ? :
17943 2065 rand 1 < 0.9 ? :
1186 796 1940 if ($s[$i])
1203 500 1 if ($args{'token'} =~ /^([a-zA-Z0-9_-]+)=*\.([a-zA-Z0-9_-]*)=*\.([a-zA-Z0-9_-]*)=*(?:\.([a-zA-Z0-9_-]+)=*\.([a-zA-Z0-9_-]+)=*)?$/)
1206 0 500 if (length $5) { }
1217 1 500 if $args{'decode_header'}