[freeside-commits] freeside/bin print-schema,NONE,1.1

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/bin
In directory wavetail:/tmp/cvs-serv23827

Added Files:
	print-schema 
Log Message:
adding print-schema

--- NEW FILE: print-schema ---
#!/usr/bin/perl

use DBIx::DBSchema;

$l = load DBIx::DBSchema "/usr/local/etc/freeside/dbdef.DBI:Pg:dbname=freeside";

print $l->pretty_print, "\n";