Perl script for judge the fastq's encoding, whether it is phred33 or phred64.