adding some old random tools from the CVS tree
authorIvan Kohler <ivan@freeside.biz>
Mon, 20 Feb 2012 02:39:25 +0000 (18:39 -0800)
committerIvan Kohler <ivan@freeside.biz>
Mon, 20 Feb 2012 02:39:25 +0000 (18:39 -0800)
bin/print-schema-mysql [new file with mode: 0755]

diff --git a/bin/print-schema-mysql b/bin/print-schema-mysql
new file mode 100755 (executable)
index 0000000..88245b6
--- /dev/null
@@ -0,0 +1,7 @@
+#!/usr/bin/perl
+
+use DBIx::DBSchema;
+
+$l = load DBIx::DBSchema "/usr/local/etc/freeside/dbdef.DBI:mysql:dbname=freeside";
+
+print $l->pretty_print, "\n";