Reemplazo de texto masivo en varios ficheros con Perl

El comando para reemplazar un texto en varios ficheros es el siguiente

perl -p -i -e "s[texto_viejo][texto_nuevo]g" *.txt

Se utilizan expresiones regulares para que matcheen, en este caso son simples textos como "texto_viejo" y "texto_nuevo". Se pueden utilizar backslashes para caracteres especiales...

Es un comando MUY util