Perl module implementing Tie hash to a DBI handle