| 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 | 0 | T | F | unless defined $flags |
| 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 |
| 164 | 50 | T | F | if defined $ENV{'APPLY_SKIP_UPDATE_CHECK'} |
| 165 | 0 | T | F | if ("$0" eq "-") |
| 177 | 0 | T | F | if ($? == 0) |
| 178 | 0 | T | F | if (compare_files($filename, $0)) |
| 187 | 50 | T | F | if ($gh_err_text =~ /error connecting to / and $gh_err_text =~ /check your internet connection/) |
| 191 | 100 | T | F | if ($gh_err_text =~ /proxyconnect tcp:.*connect: connection refused/) |
| 194 | 100 | T | F | if (defined $ENV{$proxy}) |
| 201 | 100 | T | F | if ($gh_err_text =~ /dial unix .*: connect: .*/) |
| 212 | 50 | T | F | if $exit_code == 0 |
| 220 | 50 | T | F | if $gh_auth_status == 0 |
| 225 | 100 | T | F | if (defined $ENV{$variable}) |
| 229 | 50 | T | F | if ($gh_auth_status == 0) |
| 242 | 50 | T | F | unless (gh_is_happy($program)) |
| 244 | 50 | T | F | defined $ENV{'CI'} && $ENV{'CI'} ? : |
| 267 | 50 | T | F | unless $spell_check_this_config =~ /\{.*\}/s |
| 269 | 50 | T | F | unless eval {
do {
%config = %{decode_json($spell_check_this_config);}
}
} |
| 281 | 50 | T | F | if ($?) |
| 298 | 50 | T | F | unless ($should_exclude_patterns =~ /\w/) |
| 300 | 50 | T | F | unless $should_exclude_patterns =~ /\w/ |
| 305 | 50 | T | F | if (-f $excludes) { } |
| 309 | 50 | T | F | unless /./ |
| 317 | 50 | T | F | unless $pattern =~ /./ |
| 323 | 50 | T | F | if $need_to_add_excludes |
| 329 | 50 | T | F | unless @stale |
| 332 | 50 | T | F | unless -f $_ |
| 335 | 50 | T | F | unless (@expect_files) |
| 344 | 100 | T | F | if /^(?:$re)(?:(?:\r|\n)*$|[# ].*)/ |
| 358 | 50 | T | F | unless @add |
| 362 | 50 | T | F | if (-s $new_expect_file) |
| 374 | 50 | T | F | if $word =~ /\S/ |
| 394 | 50 | T | F | if defined $gh_token |
| 402 | 100 | T | F | unless ($curl_result == 0) |
| 403 | 50 | T | F | if ($curl_stdout eq "") |
| 428 | 50 | T | F | if ($count == 0) |
| 448 | 100 | T | F | if (defined $page) |
| 451 | 50 | T | F | if (defined $id_1 and defined $id_2) |
| 452 | 50 | T | F | if ($id_2 > $id_1) |
| 460 | 100 | T | F | if (defined $download) |
| 472 | 100 | T | F | if (defined $download) |
| 483 | 50 | T | F | if defined $gh_token |
| 491 | 50 | T | F | if ($curl_result != 0) |
| 492 | 50 | T | F | if ($curl_stdout eq "") |
| 520 | 50 | T | F | if ($suffix) |
| 531 | 50 | T | F | unless $ret >> 8 |
| 534 | 100 | T | F | if ($gh_err_text =~ /no valid artifacts found to download|"Artifact has expired"/) |
| 541 | 50 | T | F | if ($expired_json ne "") |
| 544 | 50 | T | F | unless eval {
do {
$expired = decode_json($expired_json)
}
} |
| 545 | 50 | T | F | if ($expired) |
| 553 | 50 | T | F | if ($gh_err_text =~ /no artifact matches any of the names or patterns provided/) |
| 556 | 0 | T | F | if ($github_server_url) { } |
| 565 | 50 | T | F | if ($gh_err_text =~ /HTTP 404: Not Found|"status":"404"/) |
| 569 | 0 | T | F | if ($gh_err_text =~ /HTTP 403: API rate limit exceeded for .*?./) { } |
| 0 | T | F | elsif ($gh_err_text =~ m[dial tcp \S+:\d+: i/o timeout$]) { } |
| 571 | 0 | T | F | if ($retries_remaining <= 0) |
| 580 | 0 | T | F | if $gh_err_text =~ /\brequest ID\s+(\S+)/ |
| 581 | 0 | T | F | if $gh_err_text =~ /\btimestamp\s+(.*? UTC)/ |
| 586 | 0 | T | F | unless ($has_gh_token) |
| 588 | 0 | T | F | if defined $gh_token |
| 594 | 0 | T | F | if ($curl_stdout =~ m[^HTTP/\S+\s+200]) { } |
| 0 | T | F | elsif ($curl_stdout =~ m[^HTTP/\S+\s+403]) { } |
| 595 | 0 | T | F | if ($curl_stdout =~ /^x-ratelimit-remaining:\s+(\d+)$/m) { } |
| 597 | 0 | T | F | if $ratelimit_remaining > 10 |
| 605 | 0 | T | F | if ($curl_stdout =~ /^retry-after:\s+(\d+)/m) { } |
| 612 | 0 | T | F | if $curl_stdout =~ m[^(HTTP/\S+)] |
| 623 | 50 | T | F | if $artifact =~ /'/ |
| 625 | 50 | T | F | unless ($apply =~ /\{.*\}/s) |
| 635 | 50 | T | F | unless eval {
do {
$config_ref = decode_json($apply)
}
} |
| 640 | 50 | T | F | unless $git_repo_root =~ /\w/ |
| 656 | 100 | T | F | if ($line =~ /\s+artifact\.zip$/) |
| 660 | 100 | T | F | if ($line =~ /\s+1 file$/) |
| 664 | 50 | T | F | if $only_file |
| 668 | 50 | T | F | if ($has_artifact and $only_file) { } |
| 694 | 50 | T | F | unless defined $first |
| 698 | 100 | T | F | if (-s $first) { } |
| 702 | 50 | T | F | if ($first =~ m[^\s*https://.*/([^/]+/[^/]+)/actions/runs/(\d+)(?:/attempts/\d+|)(?:#(\S+)|)\s*$]) { } |
| 707 | 50 | T | F | unless defined $repo and defined $run |