dev/release-aux/fixup-CHANGES.md-release.pl

   1 #! /usr/bin/env perl -p
   2
   3 BEGIN {
   4     our $count = 1;              # Only the first one
   5     our $RELEASE = $ENV{RELEASE};
   6     our $RELEASE_TEXT = $ENV{RELEASE_TEXT};
   7     our $RELEASE_DATE = $ENV{RELEASE_DATE};
   8 }
   9
  10 if (/^### Changes between (\S+) and (\S+) \[xx XXX xxxx\]/
  11     && $count-- > 0) {
  12     $_ = "### Changes between $1 and $RELEASE_TEXT [$RELEASE_DATE]$'";
  13 }