Substitua o texto dentro dos arquivos com apenas um comando: perl

Em certas ocasiões, queremos substituir o texto dentro de um arquivo, por exemplo, mudar em Document.txt tudo o que "minha família" diz sobre "nós". Para conseguir isso, podemos usar nosso editor de texto preferido (Kate, Gedit, SublimeText, etc), mas é sempre bom saber variantes, outras maneiras de obter o mesmo resultado 🙂

Acontece que com expressões regulares isso pode ser feito, o comando sed é simplesmente magnífico, tem infinitas variantes e opções, mas ... para aqueles que querem apenas substituir o texto do maneira menos complexa possível, para eles é que trago esta variante muito mais simples:

Seguindo o exemplo, temos o arquivo Document.txt localizado em $ HOME / Document.txt com o seguinte texto:

(...) minha família é como todos eles, como o seu ou o do seu vizinho. De fato minha família Procuramos ser pessoas responsáveis ​​e aos olhos da sociedade, politicamente e socialmente corretos. Porém, na minha casa existe uma ovelha negra, e esse é o meu papel LOL! Eu sempre fui aquele que não tem medo de dizer o que pensa (mesmo que não seja aparentemente correto aos olhos da sociedade), embora na realidade minha família esteja farta do sujeira sociedade atual.

Com o seguinte comando você mudará «minha família" de "nos":

perl -pi -e "s[mi familia][nosotros]g" $HOME/Documento.txt

É simples assim 🙂

Então, o texto seria:

(...) nos é como todos eles, como o seu ou o do seu vizinho. De fato nos Procuramos ser pessoas responsáveis ​​e aos olhos da sociedade, politicamente e socialmente corretos. Porém, na minha casa existe uma ovelha negra, e esse é o meu papel LOL! Eu sempre fui aquele que não tem medo de dizer o que pensa (mesmo que não seja aparentemente correto aos olhos da sociedade), embora na realidade minha família esteja farta do sujeira sociedade atual.

A sintaxe é:

perl -pi -e "s[lo-que-quiero-cambiar][lo-nuevo-a-poner]g" archivo-en-el-cual-reemplazar

O comando pode parecer um pouco complexo, vamos decompô-lo um pouco e explicá-lo de forma mais simples 😉

• perl : O que vamos usar, perl
• -pi : Pi, como π (o valor aproximado de 3.14)
• -e : OE imagine para «e executar» ^ - ^
• Então entre aspas » nós abrimos com um s e fechamos com um g: "sg" … Imagine S para Iniciar e G para Fim de Jogo 😀
• Vire entre o sg devemos colocar dois conjuntos de colchetes: [] y [], sendo assim: "S [] [] g"
• Dentro dos primeiros colchetes, como eu disse acima, o texto que queremos remover e substituir por um novo irá, enquanto no segundo conjunto de colchetes irá o novo texto a ser colocado, seguindo o exemplo: "S [minha família] [nós] g"

Simples, não é?

A explicação é na verdade muito mais extensa do que o necessário para o comando, é bastante simples de entender 🙂

Perl é muito, muito mais do que uma forma de substituir texto, é uma linguagem completa 😉

Se você quiser saber mais sobre isso, instale o pacote perl-doc e dê uma olhada no que isso permite, é apenas um universo diferente.

A propósito e para fechar, supondo que você deseja encontrar todos os arquivos .txt que você tem em $ HOME / Documents / e em cada um substituir "minha família" por "nós", você pode entrar no find + perl para conseguir isso:

find $HOME/Documentos/ -name *.txt -exec perl -p -i -e "s[mi familia][nosotros]g" {} \;

Ou usando um curinga:

perl -p -i -e "s[mi familia][nosotros]g" $HOME/Documentos/*.txt

O problema com esta segunda variante é que ela não substitui em arquivos que estão em subpastas 🙂

De qualquer forma, espero que você tenha achado interessante. Para mim tem sido muito útil, já posso substituir o texto diretamente do terminal ... ótimo! 😀