Dbic-hooks is a project mainly written in Perl, it's free.

DBICx::Hooks - Provide hooks into DBIx::Class create()/update()/delete()