in reply to Parsing a file

Why not use Bio::Tools::Blast?