Update extract_sequence_by_pattern.pl