Improved do-find-string with option to just count the occurences of the string