| line | % | coverage | branch |
|---|
| 36 | 100 | T | F | if ($^O eq "MSWin32") |
| 43 | 100 | T | F | if -x $f |
| 50 | 100 | T | F | if check_exists_command($command) |
| 64 | 100 | T | F | if defined $token and $token ne "" |
| 66 | 100 | T | F | if defined $token and $token ne "" |
| 76 | 50 | T | F | unless defined $flags |
| 95 | 100 | T | F | unless open INPUT, "<", $file |
| 97 | 100 | T | F | if /^\s*(?:#.*)/ |
| 124 | 50 | T | F | $output_joined ne '' ? : |
| 138 | 50 | T | F | if ($? == -1) |
| 142 | 50 | T | F | if ($? & 127) |
| 143 | 0 | T | F | $? & 128 ? : |
| 147 | 50 | T | F | if $? == 0 |
| 167 | 100 | T | F | if defined $ENV{'APPLY_SKIP_UPDATE_CHECK'} |
| 168 | 100 | T | F | if ("$0" eq "-") |
| 180 | 50 | T | F | if ($? == 0) |
| 181 | 50 | T | F | if (compare_files($filename, $0)) |
| 190 | 50 | T | F | if ($gh_err_text =~ /error connecting to / and $gh_err_text =~ /check your internet connection/) |
| 194 | 100 | T | F | if ($gh_err_text =~ /proxyconnect tcp:.*connect: connection refused/) |
| 197 | 100 | T | F | if (defined $ENV{$proxy}) |
| 204 | 100 | T | F | if ($gh_err_text =~ /dial unix .*: connect: .*/) |
| 215 | 50 | T | F | if $exit_code == 0 |
| 223 | 50 | T | F | if $gh_auth_status == 0 |
| 228 | 100 | T | F | if (defined $ENV{$variable}) |
| 232 | 50 | T | F | if ($gh_auth_status == 0) |
| 245 | 50 | T | F | unless (gh_is_happy($program)) |
| 247 | 50 | T | F | defined $ENV{'CI'} && $ENV{'CI'} ? : |
| 270 | 50 | T | F | unless $spell_check_this_config =~ /\{.*\}/s |
| 272 | 50 | T | F | unless eval {
do {
%config = %{decode_json($spell_check_this_config);}
}
} |
| 284 | 50 | T | F | if ($?) |
| 301 | 50 | T | F | unless ($should_exclude_patterns =~ /\w/) |
| 303 | 50 | T | F | unless $should_exclude_patterns =~ /\w/ |
| 308 | 50 | T | F | if (-f $excludes) { } |
| 312 | 50 | T | F | unless /./ |
| 320 | 50 | T | F | unless $pattern =~ /./ |
| 326 | 50 | T | F | if $need_to_add_excludes |
| 332 | 50 | T | F | unless @stale |
| 335 | 50 | T | F | unless -f $_ |
| 338 | 50 | T | F | unless (@expect_files) |
| 347 | 100 | T | F | if /^(?:$re)(?:(?:\r|\n)*$|[# ].*)/ |
| 361 | 50 | T | F | unless @add |
| 365 | 50 | T | F | if (-s $new_expect_file) |
| 377 | 50 | T | F | if $word =~ /\S/ |
| 397 | 50 | T | F | if defined $gh_token |
| 405 | 100 | T | F | unless ($curl_result == 0) |
| 406 | 50 | T | F | if ($curl_stdout eq "") |
| 431 | 50 | T | F | if ($count == 0) |
| 451 | 100 | T | F | if (defined $page) |
| 454 | 50 | T | F | if (defined $id_1 and defined $id_2) |
| 455 | 50 | T | F | if ($id_2 > $id_1) |
| 463 | 100 | T | F | if (defined $download) |
| 475 | 100 | T | F | if (defined $download) |
| 486 | 50 | T | F | if defined $gh_token |
| 494 | 50 | T | F | if ($curl_result != 0) |
| 495 | 50 | T | F | if ($curl_stdout eq "") |
| 523 | 50 | T | F | if ($suffix) |
| 534 | 50 | T | F | unless $ret >> 8 |
| 537 | 100 | T | F | if ($gh_err_text =~ /no valid artifacts found to download|"Artifact has expired"/) |
| 544 | 50 | T | F | if ($expired_json ne "") |
| 547 | 50 | T | F | unless eval {
do {
$expired = decode_json($expired_json)
}
} |
| 548 | 50 | T | F | if ($expired) |
| 556 | 50 | T | F | if ($gh_err_text =~ /no artifact matches any of the names or patterns provided/) |
| 559 | 0 | T | F | if ($github_server_url) { } |
| 568 | 50 | T | F | if ($gh_err_text =~ /HTTP 404: Not Found|"status":"404"/) |
| 572 | 0 | T | F | if ($gh_err_text =~ /HTTP 403: API rate limit exceeded for .*?./) { } |
| 0 | T | F | elsif ($gh_err_text =~ /HTTP 502:/) { } |
| 0 | T | F | elsif ($gh_err_text =~ m[dial tcp \S+:\d+: i/o timeout$]) { } |
| 575 | 0 | T | F | if ($retries_remaining <= 0) |
| 584 | 0 | T | F | if $gh_err_text =~ /\brequest ID\s+(\S+)/ |
| 585 | 0 | T | F | if $gh_err_text =~ /\btimestamp\s+(.*? UTC)/ |
| 590 | 0 | T | F | unless ($has_gh_token) |
| 592 | 0 | T | F | if defined $gh_token |
| 598 | 0 | T | F | if ($curl_stdout =~ m[^HTTP/\S+\s+200]) { } |
| 0 | T | F | elsif ($curl_stdout =~ m[^HTTP/\S+\s+(?:403|502)]) { } |
| 599 | 0 | T | F | if ($curl_stdout =~ /^x-ratelimit-remaining:\s+(\d+)$/m) { } |
| 601 | 0 | T | F | if $ratelimit_remaining > 10 |
| 609 | 0 | T | F | if ($curl_stdout =~ /^retry-after:\s+(\d+)/m) { } |
| 616 | 0 | T | F | if $curl_stdout =~ m[^(HTTP/\S+)] |
| 627 | 50 | T | F | if $artifact =~ /'/ |
| 629 | 50 | T | F | unless ($apply =~ /\{.*\}/s) |
| 639 | 50 | T | F | unless eval {
do {
$config_ref = decode_json($apply)
}
} |
| 644 | 50 | T | F | unless $git_repo_root =~ /\w/ |
| 660 | 100 | T | F | if ($line =~ /\s+artifact\.zip$/) |
| 664 | 100 | T | F | if ($line =~ /\s+1 file$/) |
| 668 | 50 | T | F | if $only_file |
| 672 | 50 | T | F | if ($has_artifact and $only_file) { } |
| 698 | 50 | T | F | unless defined $first |
| 702 | 100 | T | F | if (-s $first) { } |
| 706 | 50 | T | F | if ($first =~ m[^\s*https://.*/([^/]+/[^/]+)/actions/runs/(\d+)(?:/attempts/\d+|)(?:#(\S+)|)\s*$]) { } |
| 711 | 50 | T | F | unless defined $repo and defined $run |