generate-apply.pl

#!/usr/bin/env perl
use JSON::PP;
my @expect_files = split /\n/, $ENV{expect_files};
my @excludes_files = split /\n/, $ENV{excludes_files};
my $new_expect_file = $ENV{new_expect_file};
my $excludes_file = $ENV{excludes_file};
my $spelling_config = $ENV{spelling_config};
my $job = $ENV{THIS_GITHUB_JOB_ID};
$config{"excludes_file"} = $excludes_file;
$config{"new_expect_file"} = $new_expect_file;
$config{"spelling_config"} = $spelling_config;
$config{"expect_files"} = \@expect_files;
$config{"excludes_files"} = \@excludes_files;
$config{"job"} = $job;
$config{"only_check_changed_files"} = $ENV{INPUT_ONLY_CHECK_CHANGED_FILES};
print encode_json \%config;