$count=($str=~ tr/($t1)//);