A "Simple Database Abstraction", available from ComprehensivePerlArchiveNetwork.  It maps each database table to a class, and provides accessors for the column names.  It supports some simple relationships.