added 'use strict;' to every .pm and .pl file where it's missing

dist-maint/update-version.pl

@@ -1,4 +1,5 @@
 #!/usr/bin/env perl
+use strict;
 my $new = shift;
 die "please supply the new version number N.NN\n" unless $new;
 my $old = shift;

lib/UR/Service/WebServer/Server.pm

@@ -1,5 +1,7 @@
 package UR::Service::WebServer::Server;
 
+use strict;
+use warnings;
 use base 'HTTP::Server::PSGI';
 
 # Override new because the default constructor doesn't accept a 'port' argument of

t/CdExample.pm

@@ -1,4 +1,5 @@
 package CdExample;
+use strict;
 use UR;
 
 class CdExample {

t/CdExample/Artist.pm

@@ -1,5 +1,6 @@
 
 package CdExample::Artist;
+use strict;
 use CdExample;
 
 class CdExample::Artist {

t/CdExample/Cd.pm

@@ -1,4 +1,5 @@
 package CdExample::Cd;
+use strict;
 use CdExample;
 
 class CdExample::Cd {

t/CmdTest.pm

@@ -1,6 +1,7 @@
 #!/usr/bin/env perl
 
 package CmdTest;
+use strict;
 use Command::Tree;
 
 class CmdTest { is => 'Command::Tree', doc => 'test suite test command tree' };

t/CmdTest/Stuff.pm

@@ -1,4 +1,5 @@
 package CmdTest::Stuff;
+use strict;
 
 class CmdTest::Stuff {
     has => [

t/Vending/Command/CoinReturn.pm

@@ -1,4 +1,5 @@
 package Vending::Command::CoinReturn;
+use strict;
 
 class Vending::Command::CoinReturn {
     is => 'Vending::Command::Outputter',

t/Vending/Command/Dime.pm

@@ -1,4 +1,5 @@
 package Vending::Command::Dime;
+use strict;
 
 class Vending::Command::Dime {
     is => 'Vending::Command::InsertMoney',

t/Vending/Command/Dollar.pm

@@ -1,4 +1,5 @@
 package Vending::Command::Dollar;
+use strict;
 
 class Vending::Command::Dollar {
     is => 'Vending::Command::InsertMoney',

t/Vending/Command/InsertMoney.pm

@@ -1,4 +1,5 @@
 package Vending::Command::InsertMoney;
+use strict;
 
 class Vending::Command::InsertMoney {
     is => 'Vending::Command',

t/Vending/Command/Menu.pm

@@ -1,4 +1,5 @@
 package Vending::Command::Menu;
+use strict;
 
 class Vending::Command::Menu {
     is => ['UR::Object::Command::List', 'Vending::Command' ],

t/Vending/Command/Nickel.pm

@@ -1,4 +1,5 @@
 package Vending::Command::Nickel;
+use strict;
 
 class Vending::Command::Nickel {
     is => 'Vending::Command::InsertMoney',

t/Vending/Command/Quarter.pm

@@ -1,4 +1,5 @@
 package Vending::Command::Quarter;
+use strict;
 
 class Vending::Command::Quarter {
     is => 'Vending::Command::InsertMoney',

t/Vending/Command/Service/Show/Money.pm

@@ -1,4 +1,5 @@
 package Vending::Command::Service::Show::Money;
+use strict;
 
 class Vending::Command::Service::Show::Money {
     is_abstract => 1,

t/Vending/get_coin_by_value.pl

@@ -1,3 +1,4 @@
+use strict;
 use above 'Vending';
 
 # Requires a 3-table database join (COIN, CONTENT and CONTENT_TYPE), plus a

t/Vending/vend_interactive.pl

@@ -1,5 +1,6 @@
 #!/gsc/bin/perl
 
+use strict;
 use above 'Vending';
 
 my $machine = Vending::Machine->get();

t/class_browser/test_namespace/Testing.pm

@@ -1,5 +1,6 @@
 package Testing;
 
+use strict;
 use UR;
 
 class Testing {

t/class_browser/test_namespace/Testing/Color.pm

@@ -1,5 +1,6 @@
 package Testing::Color;
 
+use strict;
 use Testing;
 
 class Testing::Color {

t/class_browser/test_namespace/Testing/Something.pm

@@ -1,4 +1,5 @@
 package Testing::Something;
+use strict;
 
 class Testing::Something {
     id_by => [

t/class_browser/test_namespace/Testing/Something/SubClass1.pm

@@ -1,4 +1,5 @@
 package Testing::Something::SubClass1;
+use strict;
 
 class Testing::Something::SubClass1 {
     is => 'Testing::Something',

t/class_browser/test_namespace/Testing/Something/SubClass2.pm

@@ -1,4 +1,5 @@
 package Testing::Something::SubClass2;
+use strict;
 
 class Testing::Something::SubClass2 {
     is => 'Testing::Something',

t/ur-cachetest.pl

@@ -1,3 +1,4 @@
+use strict;
 use Time::HiRes; 
 
 my $n_props = shift(@ARGV) || 5;

t/urbenchmark.pl

@@ -1,3 +1,4 @@
+use strict;
 use Time::HiRes; 
 
 my $n_props = shift(@ARGV) || 5;