refactored genotypingQC to pass perlcritic criteria