| line | % | coverage | branch |
|---|
| 668 | 100 | T | F | defined $args->{'content'} ? : |
| 681 | 100 | T | F | if ($existing =~ /$DEVELOP_OPEN_RE/gx) |
| 683 | 100 | T | F | if ($existing =~ /^[ \t]*\};/gmx) |
| 694 | 100 | T | F | unless $mod =~ /$MODULE_NAME_RE/ |
| 700 | 100 | T | F | if (length($ver // "") and not _valid_requirement($ver)) |
| 709 | 100 | T | F | if ($with_dev) |
| 718 | 100 | T | F | unless $dev->{$_} |
| 799 | 100 | T | F | unless -f $makefile and -r _ |
| 802 | 100 | T | F | unless (eval {
do {
$content = Path::Tiny::path($makefile)->slurp_utf8;
1
}
}) |
| 810 | 100 | T | F | if ref $@ or not $@ =~ /decode|ill-formed|utf/xi |
| 962 | 100 | T | F | if not defined $content or ref $content |
| 978 | 100 | T | F | if _in_comment($comments, $at) |
| 990 | 100 | T | F | if _in_comment($comments, $at) |
| 996 | 100 | T | F | unless $VALID_PHASE{$phase_name} |
| 997 | 100 | T | F | if _in_comment($comments, $phase_at) |
| 1002 | 100 | T | F | unless $VALID_REL{$rel} |
| 1003 | 100 | T | F | if _in_comment($comments, $rel_at) |
| 1020 | 100 | T | F | if _in_comment(\@prereqs_spans, $at) |
| 1021 | 100 | T | F | if _in_comment($comments, $at) |
| 1046 | 100 | T | F | if (substr($content, $-[0], 1) eq '{') { } |
| 100 | T | F | elsif (@open) { } |
| 1118 | 100 | T | F | if (index($line, "#") != -1) |
| 1124 | 100 | T | F | if (defined $comment) |
| 1151 | 100 | T | F | unless _valid_requirement($ver) |
| 1154 | 100 | T | F | $i == $#pairs ? : |
| 1171 | 100 | T | F | if not defined $content or ref $content |
| 1172 | 100 | T | F | unless $content =~ /\bMIN_PERL_VERSION\b\s*=>\s*$VALUE_TOKEN_RE/x |
| 1174 | 100 | T | F | _valid_version($ver) ? : |
| 1193 | 100 | T | F | if (index($line, "#") != -1 and $line =~ /$TO_COMMENT_RE/x) |
| 1212 | 100 | T | F | if ($pos < $start) { } |
| 100 | T | F | elsif ($pos >= $end) { } |
| 1228 | 100 | T | F | defined $ver && $ver =~ /$VERSION_RE/x ? : |
| 1240 | 100 | T | F | defined $req && $req =~ /$REQUIREMENT_RE/x ? : |
| 1275 | 100 | T | F | unless length($home // "") |
| 1284 | 100 | T | F | unless (@stat) |
| 1285 | 100 | T | F | unless $!{'ENOENT'} or $!{'ENOTDIR'} |
| 1292 | 100 | T | F | unless Fcntl::S_ISREG($stat[2]) |
| 1299 | 100 | T | F | unless ($yaml) |
| 1308 | 100 | T | F | ref $doc eq 'HASH' ? : |
| 1309 | 100 | T | F | unless (ref $develop eq "HASH") |
| 1320 | 100 | T | F | unless ($mod =~ /$MODULE_NAME_RE/) |
| 1328 | 100 | T | F | unless ($v eq "" or _valid_requirement($v)) |
| 1357 | 100 | T | F | if _has_version($min_perl) |
| 1362 | 100 | T | F | $phase eq 'runtime' ? : |
| 1366 | 100 | T | F | if $body eq "" |
| 1367 | 100 | T | F | $phase eq 'runtime' ? : |
| 1405 | 100 | T | F | if _has_version($entry->{'version'}) |
| 1411 | 100 | T | F | if (defined $entry->{'comment'}) { } |
| 1437 | 100 | T | F | unless defined $ver |
| 1438 | 100 | T | F | $ver =~ /\A \s* >= \s* v? [0._]* \s* \z/x ? : |
| 100 | T | F | if $ver =~ /[<>=!]/x |
| 1439 | 100 | T | F | $ver =~ /[1-9]/x ? : |