Its nice to use regular expression. It will solve easily. Further more info, see, "man perlre". I don't know what reason do you want to use flags.

It's not the website to get the source code, First explain, what you have tried, and if you are facing any problem, ask in this forum?.