Merge 'roundtrip' into 'trunk'

[dbsrgits/SQL-Translator.git] / bin / sqlt-dumper

diff --git a/bin/sqlt-dumper b/bin/sqlt-dumper
index 85be62f..0f80959 100755 (executable)
--- a/bin/sqlt-dumper
+++ b/bin/sqlt-dumper
@@ -1,8 +1,6 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 # -------------------------------------------------------------------
-# $Id: sqlt-dumper 1440 2009-01-17 16:31:57Z jawnsy $
-# -------------------------------------------------------------------
 # Copyright (C) 2002-2009 SQLFairy Authors
 #
 # This program is free software; you can redistribute it and/or
@@ -57,13 +55,14 @@ argument.
 # -------------------------------------------------------------------
 
 use strict;
+use warnings;
 use Pod::Usage;
 use Getopt::Long;
 use SQL::Translator;
 use File::Basename qw(basename);
 
 use vars '$VERSION';
-$VERSION = '1.99';
+$VERSION = '1.59';
 
 my ( $help, $db, $skip, $skiplike, $db_user, $db_pass, $dsn );
 GetOptions(
@@ -105,7 +104,7 @@ exit(0);
 
 =head1 AUTHOR
 
-Ken Y. Clark E<lt>kclark@cpan.orgE<gt>.
+Ken Youens-Clark E<lt>kclark@cpan.orgE<gt>.
 
 =head1 SEE ALSO