diff options
author | pmichaud <pmichaud@pobox.com> | 2012-07-27 01:58:45 -0500 |
---|---|---|
committer | pmichaud <pmichaud@pobox.com> | 2012-07-27 01:58:45 -0500 |
commit | 80c00b591396494123c5e1823966ccc0768f8ca1 (patch) | |
tree | 1ccfe8bd3017e2c665ebb70d61bbffa8c3786588 /skel/tools/build/wxs-patch.pl | |
parent | 6066c440ae2d26b25856818d0a7375bdf49e977f (diff) |
Add script to patch wxs file generated by Wix "heat" command.
Diffstat (limited to 'skel/tools/build/wxs-patch.pl')
-rw-r--r-- | skel/tools/build/wxs-patch.pl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/skel/tools/build/wxs-patch.pl b/skel/tools/build/wxs-patch.pl new file mode 100644 index 0000000..120c9b2 --- /dev/null +++ b/skel/tools/build/wxs-patch.pl @@ -0,0 +1,15 @@ +#! perl + +open my $fh, '<', 'VERSION' + or die "Cannot open VERSION for reading: $!"; +my $VERSION = <$fh>; chomp $VERSION; +close $fh; + +while (<>) { + s/PUT-COMPANY-NAME-HERE/Rakudo Perl 6/g; + s/PUT-PRODUCT-NAME-HERE/Rakudo Star $VERSION/g; + s/PUT-FEATURE-TITLE-HERE/Rakudo Star $VERSION/g; + print; +} + + |