$diff="ABCDE" ^ "BBCCD";
$count=$diff=~tr/\0//c;