One-line Perl Replace

UPDATE: Após mais de um arrumei o comando, que estava sem a segunda barra (/) no final.

Essa linha magica já me salvou várias vezes, ela altera em todos
arquivos *.txt a palavra “ENCONTRA” por “ALTERA”.
Esse cara é case sensitive..
Você pode incrementar mais o find, passando mais tipos de arquivos,
ou sendo mais específico de milhões de formas, basta usar a imaginação 😉

~# find . -name '*.htm' -print0 | xargs -0 perl -pi -e 's/ENCONTRA/ALTERA/'