(++) Also DRY on the filename because a typo in just the first one is an intensely annoying bug when it happens.

my $outfile = 'generic_bist_ctrl_defines.sv';
open my $fh, '>', $outfile or die "Can't open > $outfile: $!";
[download]