Perl scripts for analyzing RNA-Seq data from samples differing at a single locus