| line | % | coverage | branch |
|---|
| 163 | 100 | T | F | unless $args{'schema'} |
| 164 | 100 | T | F | unless $args{'target_sub'} |
| 188 | 50 | T | F | eval {
do {
require Devel::Cover;
1
}
} ? : |
| 192 | 0 | T | F | unless ($self->{'_cover_available'} or $cover_warned++) |
| 258 | 100 | T | F | if (@{$self->{'corpus'};} and rand() < $CORPUS_MUTATE_RATIO) { } |
| 361 | 100 | T | F | unless defined $path |
| 365 | 100 | T | F | unless open my $fh, ">", $path |
| 421 | 100 | T | F | unless defined $path |
| 425 | 100 | T | F | unless open my $fh, "<", $path |
| 464 | 50 | T | F | if $ok |
| 494 | 50 | T | F | if ($self->{'_cover_available'}) { } |
| 501 | 0 | T | F | defined $self->{'instance'} ? : |
| 512 | 0 | T | F | if $self->{'timeout'} |
| 515 | 0 | T | F | if $self->{'timeout'} |
| 516 | 0 | T | F | if $@ |
| 519 | 0 | T | F | if (not defined $error and @warnings) |
| 521 | 0 | T | F | if $w =~ /uninitialized|undefined|blessed|invalid/i |
| 528 | 100 | T | F | if ($error and $self->_input_is_valid($input)) |
| 534 | 100 | T | F | if ($self->_is_interesting($coverage)) |
| 570 | 50 | T | F | if "Devel::Cover"->can("start") |
| 572 | 100 | T | F | unless $self->{'_last_cover_snapshot'} |
| 576 | 100 | T | F | defined $self->{'instance'} ? : |
| 584 | 100 | T | F | if $self->{'timeout'} |
| 587 | 100 | T | F | if $self->{'timeout'} |
| 588 | 100 | T | F | if $@ |
| 592 | 50 | T | F | if "Devel::Cover"->can("stop") |
| 597 | 0 | T | F | unless exists $before{$key} |
| 625 | 50 | T | F | unless $cover |
| 628 | 0 | T | F | unless my $branch = $cover->{$file}{'branch'} |
| 632 | 0 | T | F | if $branch->{$line}[$b] |
| 663 | 100 | T | F | unless $self->{'covered'}{$key} |
| 667 | 100 | T | F | unless %{$coverage;} |
| 724 | 100 | T | F | unless defined $spec |
| 725 | 100 | T | F | if $spec eq "undef" |
| 727 | 50 | T | F | ref $spec ? : |
| 730 | 100 | T | F | if (ref $spec and $spec->{'edge_case_array'} and rand() < $EDGE_CASE_RATIO) |
| 736 | 100 | T | F | if ($type eq $TYPE_INTEGER) { } |
| 50 | T | F | elsif ($type eq $TYPE_NUMBER) { } |
| 100 | T | F | elsif ($type eq $TYPE_BOOLEAN) { } |
| 100 | T | F | elsif ($type eq $TYPE_ARRAY) { } |
| 100 | T | F | elsif ($type eq $TYPE_HASH) { } |
| 762 | 100 | T | F | if (rand() < $INT_BOUNDARY_RATIO) |
| 811 | 100 | T | F | if (rand() < $STR_BOUNDARY_RATIO) { } |
| 819 | 50 | T | F | if $len < 0 |
| 888 | 100 | T | F | unless defined $spec and ref $spec |
| 892 | 100 | T | F | if ($input_style eq "hash" or ref $input eq "HASH") |
| 913 | 100 | T | F | unless defined $input |
| 917 | 100 | T | F | if $key =~ /^_/ |
| 920 | 50 | T | F | unless ref $field_spec eq "HASH" |
| 922 | 50 | T | F | ref $input eq 'HASH' ? : |
| 925 | 100 | T | F | unless (defined $value or $field_spec->{'optional'}) |
| 929 | 100 | T | F | unless defined $value |
| 931 | 100 | T | F | unless $self->_validate_value($value, $field_spec) |
| 957 | 100 | T | F | unless defined $value |
| 961 | 100 | T | F | if ($type eq $TYPE_INTEGER) { } |
| 100 | T | F | elsif ($type eq $TYPE_NUMBER) { } |
| 100 | T | F | elsif ($type eq $TYPE_STRING) { } |
| 100 | T | F | elsif ($type eq $TYPE_BOOLEAN) { } |
| 100 | T | F | elsif ($type eq $TYPE_ARRAY or $type eq 'array') { } |
| 50 | T | F | elsif ($type eq $TYPE_HASH or $type eq 'hash') { } |
| 962 | 100 | T | F | unless $value =~ /^-?\d+$/ |
| 963 | 100 | T | F | if defined $spec->{'min'} and $value < $spec->{'min'} |
| 964 | 100 | T | F | if defined $spec->{'max'} and $value > $spec->{'max'} |
| 968 | 100 | T | F | unless $value =~ /^-?(?:\d+\.?\d*|\.\d+)(?:[eE][+-]?\d+)?$/ |
| 969 | 50 | T | F | if defined $spec->{'min'} and $value < $spec->{'min'} |
| 970 | 50 | T | F | if defined $spec->{'max'} and $value > $spec->{'max'} |
| 974 | 100 | T | F | if defined $spec->{'min'} and $len < $spec->{'min'} |
| 975 | 100 | T | F | if defined $spec->{'max'} and $len > $spec->{'max'} |
| 976 | 100 | T | F | if (defined $spec->{'matches'}) |
| 992 | 100 | T | F | unless $matched |
| 996 | 100 | T | F | unless $value =~ /^[01]$/ |
| 999 | 100 | T | F | unless ref $value eq "ARRAY" |
| 1002 | 100 | T | F | unless ref $value eq "HASH" |
| 1027 | 100 | T | F | if (not defined $input) { } |
| 100 | T | F | elsif (not $type) { } |
| 100 | T | F | elsif ($type eq 'ARRAY') { } |
| 100 | T | F | elsif ($type eq 'HASH') { } |
| 1033 | 100 | T | F | if ($input =~ /^-?\d+$/) { } |
| 100 | T | F | elsif ($input =~ /^-?[\d.]+$/) { } |
| 1069 | 100 | T | F | $n == 0 ? : |
| 1123 | 50 | T | F | unless $len |
| 1138 | 100 | T | F | unless $len |
| 1181 | 50 | T | F | unless @copy |
| 1188 | 100 | T | F | unless @copy |
| 1195 | 100 | T | F | unless @copy |
| 1223 | 100 | T | F | unless @keys |