Take a look at Autodia and SQL::Translator.
In reply to Re: ERD Diagram Generation by adrianh in thread ERD Diagram Generation by Anonymous Monk