Rewrite sql formatter script and shove it into examples until more tested

[dbsrgits/SQL-Abstract.git] / examples / dbic-console.pl

diff --git a/examples/dbic-console.pl b/examples/dbic-console.pl
index c4bb624..5054424 100644 (file)
--- 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({