projects
/
freeside.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
886e3250bd7102006bed19196d39228355b04e69
[freeside.git]
/
print-schema
1
#!/usr/bin/perl
2
3
use DBIx::DBSchema;
4
5
$l = load DBIx::DBSchema "/usr/local/etc/freeside/dbdef.DBI:Pg:dbname=freeside";
6
7
print $l->pretty_print, "\n";