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

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

diff --git a/examples/console.pl b/examples/console.pl
index 277c5c2..abb4386 100644 (file)
--- a/examples/console.pl
+++ b/examples/console.pl
@@ -1,5 +1,8 @@
 #!/sur/bin/env perl
 
+use warnings;
+use strict;
+
 use SQL::Abstract::Tree;
 
 my $sqlat = SQL::Abstract::Tree->new({ profile => 'console' });