while (<>) { s/$searchPattern1/$repalcePattern1/g; s/$searchPattern2/$replacePattern2/g; s/$searchPattern3/$replacePattern3/g; print; }