$cnt = @{[$str =~ /(\.)/g]}; [download]
In reply to Re^2: Counting number of characters in a string by simul in thread Counting number of characters in a string by jeffpflueger