There are other approaches:
In reply to Re: arranging code that works with SQL databases in Perl by Corion in thread arranging code that works with SQL databases in Perl by metaperl