File Coverage

File:generate-apply.pl
Coverage:100.0%

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