File Coverage

File:generate-apply.pl
Coverage:100.0%

linestmtbrancondsubtimecode
1#!/usr/bin/env perl
2
3
3
3
3
4839
21241
1925
use JSON::PP;
3
3
124822
my @expect_files = split /\n/, $ENV{expect_files};
4
3
7
my @excludes_files = split /\n/, $ENV{excludes_files};
5
3
8
my $new_expect_file = $ENV{new_expect_file};
6
3
7
my $excludes_file = $ENV{excludes_file};
7
3
3
my $spelling_config = $ENV{spelling_config};
8
3
7
my $job = $ENV{THIS_GITHUB_JOB_ID};
9
3
4
$config{"excludes_file"} = $excludes_file;
10
3
4
$config{"new_expect_file"} = $new_expect_file;
11
3
4
$config{"spelling_config"} = $spelling_config;
12
3
4
$config{"expect_files"} = \@expect_files;
13
3
5
$config{"excludes_files"} = \@excludes_files;
14
3
3
$config{"job"} = $job;
15
3
3
$config{"only_check_changed_files"} = $ENV{INPUT_ONLY_CHECK_CHANGED_FILES};
16
3
9
print encode_json \%config;