If you change "tr" to "s" then you can replace longer strings:

tr = translate (a character at a time)

s = substitute (whole strings)

The only trick is that the substitutions take a regular expression, so some characters have special meanings ( . * ? + brackets etc) and must be escaped with a backslash.

If you want to learn more, check the Perl docs. :)

- Phil