Don't hardcode Perl path; Release 1.3.7

scripts/update-revision.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 
@@ -7,7 +7,7 @@
 $revision =~ s/^([0-9]+).*/$1/g;
 $revision += 1;
 
-`/usr/bin/perl -e 's/CG3_REVISION = [0-9]+;\$/CG3_REVISION = $revision;/;' -pi src/version.hpp`;
+`perl -e 's/CG3_REVISION = [0-9]+;\$/CG3_REVISION = $revision;/;' -pi src/version.hpp`;
 `svn2cl --group-by-day -i --reparagraph --limit 350`;
 
 print "Set revision to $revision.\n";

src/version.hpp

@@ -29,7 +29,7 @@ constexpr auto CG3_COPYRIGHT_STRING = "Copyright (C) 2007-2021 GrammarSoft ApS.
 
 constexpr uint32_t CG3_VERSION_MAJOR = 1;
 constexpr uint32_t CG3_VERSION_MINOR = 3;
-constexpr uint32_t CG3_VERSION_PATCH = 6;
+constexpr uint32_t CG3_VERSION_PATCH = 7;
 constexpr uint32_t CG3_REVISION = 13892;
 constexpr uint32_t CG3_FEATURE_REV = 13892;
 constexpr uint32_t CG3_TOO_OLD = 10373;

test/Apertium/T_AnyMinusSome/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_Append/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_Barrier/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_CarefulBarrier/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_CharsInWhiteSpace/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_CompositeSelect/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_ContextTest/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_Delimit/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_DontMatchEmptySet/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_EndlessSelect/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_Flush/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_Generate/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_Iff/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_Joiner/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_MapAdd_Different/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_MatchBaseform/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_MatchWordform/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_MultiWords/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_MultipleSections/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_MultiwordTagStaying/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_NegatedContextTest/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_RegExp_Map/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_RegExp_Select/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_RegExp_Substitute/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_Remove/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_RemoveSingleTag/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_ScanningTests/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_Sections/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_Select/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_SetOp_FailFast/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_SetOp_OR/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_SpaceInWord/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_Substitute/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_SuperBlanks/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_SuperBlanksNewline/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_SuperBlanksWithEscape/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_Unification/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/T_UnknownWord/run.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);

test/Apertium/runall.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use Cwd qw(realpath);