I use Class::DBI with dynamic SQL and joins. I still have to write the SQL statements, but everything else is done for me. Look at the section of the docs on "Ima::DBI Queries" for more.