X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=bin%2Fsqlt-dumper;h=0f809596258967e1860436d7993ec13a2995789d;hb=969049bac34339de63ddb893e94aed228e3a5de9;hp=3cc0d75f6d17c66ed72be7713902749401ef68b9;hpb=478f608d9028508396da37bb5df10b3057b96981;p=dbsrgits%2FSQL-Translator.git

diff --git a/bin/sqlt-dumper b/bin/sqlt-dumper
index 3cc0d75..0f80959 100755
--- a/bin/sqlt-dumper
+++ b/bin/sqlt-dumper
@@ -1,8 +1,6 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 # -------------------------------------------------------------------
-# $Id$
-# -------------------------------------------------------------------
 # Copyright (C) 2002-2009 SQLFairy Authors
 #
 # This program is free software; you can redistribute it and/or
@@ -57,11 +55,15 @@ argument.
 # -------------------------------------------------------------------
 
 use strict;
+use warnings;
 use Pod::Usage;
 use Getopt::Long;
 use SQL::Translator;
 use File::Basename qw(basename);
 
+use vars '$VERSION';
+$VERSION = '1.59';
+
 my ( $help, $db, $skip, $skiplike, $db_user, $db_pass, $dsn );
 GetOptions(
     'h|help'        => \$help,
@@ -102,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