$c += () = $n =~ m[$t]g;