in reply to how to find substring using regex
perlfaq4 - How can I count the number of occurrences of a substring within a string?