This is a perl script to extract line in a SAM file specifically designed to pickup mismatched small RNA with mismatched polyA at the end.