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

##</code><code>##

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