briandfoy

#!/bin/bash

# Don't judge me too harshly. This is a throwaway that I put
# together in 5 minutes to make a couple hundred pull requests
DEV=/Users/brian/Dev
target=.github/workflows/windows.yml
message="Update windows workflow"
echo MESSAGE $message
branch=windows-update
json=$(cat <<-END

briandfoy

#!perl
use v5.36;
use feature ();

my( %Features, %Versions );
foreach my $key ( keys %feature::feature_bundle ) {
	next unless $key =~ /\A5\.\d[02468]\z/;
	$Versions{$key}++;
	foreach my $feature ( $feature::feature_bundle{$key}->@* ) {
		$Features{$feature}{$key}++;