$count = /\s/ for ($txt);   

##</code><code>##

$count = () = /\s/g for $txt;