Add strict and warnings pragmas in test files

t/001_load.t

@@ -2,6 +2,9 @@
 
 # t/001_load.t - check module loading and create testing directory
 
+use strict;
+use warnings;
+
 use Test::More tests => 1;
 
 BEGIN { 

t/lib/DBICTest/Schema.pm

@@ -1,6 +1,9 @@
 package # hide from PAUSE
     DBICTest::Schema;
 
+use strict;
+use warnings;
+
 use base qw/DBIx::Class::Schema/;
 
 no warnings qw/qw/;

t/lib/DBICTest/Schema/SerializeJSON.pm

@@ -1,6 +1,9 @@
 package # hide from PAUSE
     DBICTest::Schema::SerializeJSON;
 
+use strict;
+use warnings;
+
 use base qw/DBIx::Class/;
 
 __PACKAGE__->load_components (qw/InflateColumn::Serializer Core/);

t/lib/DBICTest/Schema/SerializeStorable.pm

@@ -1,6 +1,9 @@
 package # hide from PAUSE
     DBICTest::Schema::SerializeStorable;
 
+use strict;
+use warnings;
+
 use base qw/DBIx::Class/;
 
 __PACKAGE__->load_components (qw/InflateColumn::Serializer Core/);

t/lib/DBICTest/Schema/SerializeYAML.pm

@@ -1,6 +1,9 @@
 package # hide from PAUSE
     DBICTest::Schema::SerializeYAML;
 
+use strict;
+use warnings;
+
 use base qw/DBIx::Class/;
 
 __PACKAGE__->load_components (qw/InflateColumn::Serializer Core/);

t/lib/DBICTest/Schema/TestTable.pm

@@ -1,6 +1,9 @@
 package # hide from PAUSE
     DBICTest::Schema::TestTable;
 
+use strict;
+use warnings;
+
 use base qw/DBIx::Class/;
 
 __PACKAGE__->load_components (qw/Core/);

xt/kwalitee.t

@@ -1,4 +1,6 @@
-# in a separate test file
+use strict;
+use warnings;
+
 use Test::More;
 
 eval { require Test::Kwalitee; Test::Kwalitee->import() };

xt/pod.t

@@ -1,5 +1,8 @@
 # -*- perl -*-
 
+use strict;
+use warnings;
+
 use Test::More;
 eval "use Test::Pod 1.00";
 plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;

xt/podcoverage.t

@@ -1,5 +1,8 @@
 # -*- perl -*-
 
+use strict;
+use warnings;
+
 use Test::More;
 eval "use Test::Pod::Coverage 1.00";
 plan skip_all => "Test::Pod::Coverage 1.00 required for testing POD coverage" if $@;