if( "$substr1$substr2" =~ /[^@aminos]/ )