Here's the one that I wrote a while back in Perl that we use at Opera:

  https://github.com/alfie/MySQL--Replication

It's only statement based, but it is serving us well.