FastaManipulator has a option: extract_titles