Fixed my name, Perl shebang.
Ken Youens-Clark [Tue, 14 Apr 2009 21:24:25 +0000 (21:24 +0000)]
bin/sqlt
bin/sqlt-diagram
bin/sqlt-diff
bin/sqlt-diff-old
bin/sqlt-dumper
bin/sqlt.cgi

index 7999c09..5d4eccc 100755 (executable)
--- a/bin/sqlt
+++ b/bin/sqlt
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
 # vim: set ft=perl:
 
 # -------------------------------------------------------------------
@@ -147,6 +147,7 @@ knows about, allowing you to easily substitute your own.
 # -------------------------------------------------------------------
 
 use strict;
+use warnings;
 use Getopt::Long;
 use Pod::Usage;
 use SQL::Translator;
index c47aca7..7e38a04 100755 (executable)
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 # -------------------------------------------------------------------
 # Copyright (C) 2002-2009 SQLFairy Authors
@@ -68,6 +68,7 @@ to achieve this.
 =cut
 
 use strict;
+use warnings;
 use Data::Dumper;
 use Getopt::Long;
 use Pod::Usage;
@@ -145,6 +146,6 @@ for my $file (@files) {
 
 =head1 AUTHOR
 
-Ken Y. Clark E<lt>kclark@cpan.orgE<gt>.
+Ken Youens-Clark E<lt>kclark@cpan.orgE<gt>.
 
 =cut
index 0afc495..3a5a6a5 100755 (executable)
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
 # vim: set ft=perl:
 
 # -------------------------------------------------------------------
@@ -103,6 +103,7 @@ Currently (v0.0900), only MySQL is supported by this code.
 # -------------------------------------------------------------------
 
 use strict;
+use warnings;
 use Pod::Usage;
 use Data::Dumper;
 use SQL::Translator;
@@ -232,7 +233,7 @@ else
 
 =head1 AUTHOR
 
-Ken Y. Clark E<lt>kclark@cpan.orgE<gt>.
+Ken Youens-Clark E<lt>kclark@cpan.orgE<gt>.
 
 =head1 SEE ALSO
 
index 7ec9b78..4aff12f 100755 (executable)
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
 # vim: set ft=perl:
 
 # -------------------------------------------------------------------
@@ -89,6 +89,7 @@ your target database.
 # -------------------------------------------------------------------
 
 use strict;
+use warnings;
 use Pod::Usage;
 use Data::Dumper;
 use SQL::Translator;
@@ -541,7 +542,7 @@ sub constraint_to_string {
 
 =head1 AUTHOR
 
-Ken Y. Clark E<lt>kclark@cpan.orgE<gt>.
+Ken Youens-Clark E<lt>kclark@cpan.orgE<gt>.
 
 =head1 SEE ALSO
 
index 796711f..0f80959 100755 (executable)
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 # -------------------------------------------------------------------
 # Copyright (C) 2002-2009 SQLFairy Authors
@@ -55,6 +55,7 @@ argument.
 # -------------------------------------------------------------------
 
 use strict;
+use warnings;
 use Pod::Usage;
 use Getopt::Long;
 use SQL::Translator;
@@ -103,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
 
index 513042d..658e5ab 100755 (executable)
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 # -------------------------------------------------------------------
 # Copyright (C) 2002-2009 SQLFairy Authors
@@ -33,6 +33,7 @@ all the parsers and producers of SQL::Translator.
 # -------------------------------------------------------------------
 
 use strict;
+use warnings;
 use CGI;
 use SQL::Translator;
 
@@ -545,7 +546,7 @@ sub show_form {
 
 =head1 AUTHOR
 
-Ken Y. Clark E<lt>kclark@cpan.orgE<gt>.
+Ken Youens-Clark E<lt>kclark@cpan.orgE<gt>.
 
 =head1 SEE ALSO