MySQL::SlowLog::Filter

we are using mysqlsla to parse MySQL slow.log, but we have an issue that our slow.log is pretty huge, it contains 2 years' data. somehow I just need 3 month or half a year.

I'm searching around to find a script to do the things I want and I find http://code.google.com/p/mysql-log-filter/
it's python(php) script and I do want a Perl script.

then http://search.cpan.org/dist/MySQL-SlowLog-Filter/ is out.
and a script: http://search.cpan.org/dist/MySQL-SlowLog-Filter/script/mysql_slowlog_filter.pl

have fun