X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=examples%2Fdbic-console.pl;h=5054424263c52651cae9da468c0b49abed10277a;hb=5f3fa0ac25497f9ab48ae4950d070208894f5af8;hp=c4bb624dde75815a0b377b1581b7a96ffc77dff7;hpb=c54740ba9963ea408e5b8d0dd8e8cb8fc4886dc6;p=scpubgit%2FQ-Branch.git

diff --git a/examples/dbic-console.pl b/examples/dbic-console.pl
index c4bb624..5054424 100644
--- a/examples/dbic-console.pl
+++ b/examples/dbic-console.pl
@@ -1,5 +1,8 @@
 #!/sur/bin/env perl
 
+use warnings;
+use strict;
+
 use DBIx::Class::Storage::Debug::PrettyPrint;
 
 my $pp = DBIx::Class::Storage::Debug::PrettyPrint->new({