Add strict and warnings pragmas to test scripts

test/api.t

@@ -1,3 +1,6 @@
+use strict;
+use warnings;
+
 use Test::More;
 
 use Pegex::Parser;

test/export-api.t

@@ -1,3 +1,6 @@
+use strict;
+use warnings;
+
 # BEGIN { $Pegex::Parser::Debug = 1 }
 use Test::More tests => 8;
 

test/flatten.t

@@ -1,3 +1,6 @@
+use strict;
+use warnings;
+
 use Test::More tests => 1;
 use Pegex;
 

test/function-rule.t

@@ -1,3 +1,6 @@
+use strict;
+use warnings;
+
 use Test::More;
 use Pegex::Parser;
 

test/grammar-api.t

@@ -1,3 +1,6 @@
+use strict;
+use warnings;
+
 use Test::More tests => 1;
 
 package MyGrammar1;

test/parse.t

@@ -1,3 +1,6 @@
+use strict;
+use warnings;
+
 # $Pegex::Parser::Debug = 1;
 
 my $t; use lib ($t = -e 't' ? 't' : 'test');
@@ -6,7 +9,7 @@ use Test::More tests => 1;
 use Pegex;
 use Pegex::Input;
 
-$grammar_file = "$t/mice.pgx";
+my $grammar_file = "$t/mice.pgx";
 
 eval { pegex( Pegex::Input->new(file => $grammar_file) )->parse("3 blind mice\n") }; $@
 ? fail $@

test/repeat.t

@@ -1,3 +1,6 @@
+use strict;
+use warnings;
+
 use Test::More;
 
 use Pegex;

test/safe.t

@@ -1,3 +1,6 @@
+use strict;
+use warnings;
+
 use Test::More;
 
 # 2015-02-03 Safe.pm fails to load on Travis + 5.14

test/sample.t

@@ -1,3 +1,6 @@
+use strict;
+use warnings;
+
 use Test::More;
 
 eval "use YAML::XS; 1" or