https://www.manu.co.in/replace-in-perl/