if ( =~ m/[^actgACTG]/ ) {