Datamapper written in Perl