MeuselBlast is a project mainly written in Perl, it's free.
skim through BLAST result files and process information therein