Substitueix text dins d'arxius amb només una ordre: perl

En determinades ocasions desitgem reemplaçar text dins d'un arxiu, per exemple, canviar a document.txt tot el que digui «la meva família» per «nosaltres». Per aconseguir això podem utilitzar el nostre editor de text preferit (Kate, Gedit, SublimeText, etc.) però sempre és bo conèixer variants, altres formes d'aconseguir el mateix resultat 🙂

Passa que amb expressions regulars es pot aconseguir això, la comanda set és simplement magnífic, té una infinitat de variants i opcions però ... per a aquells que només volen reemplaçar text de la forma menys complexa possible, Per a ells és que porto aquesta variant molt més simple:

Seguint l'exemple, tenim l'arxiu document.txt ubicat a $ HOME / document.txt amb el següent text:

(...) la meva família és com totes, com la teva o la del teu veí. de fet la meva família intentem ser persones responsables i als ulls de la societat, políticament i socialment correctes. No obstant això, a casa meva hi ha una ovella negra, i aquest és el meu paper LOL !. Jo sempre he estat el que no té por de dir el que pensa (encara que no sigui aparentment correcte a ulls de la societat), encara que en realitat la meva família està farta de la brutícia societat d'avui dia.

Amb la següent comanda canviarà «la meva família»Per«nosaltres":

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

Així de simple 🙂

Llavors el text seria:

(...) nosaltres és com totes, com la teva o la del teu veí. de fet nosaltres intentem ser persones responsables i als ulls de la societat, políticament i socialment correctes. No obstant això, a casa meva hi ha una ovella negra, i aquest és el meu paper LOL !. Jo sempre he estat el que no té por de dir el que pensa (encara que no sigui aparentment correcte a ulls de la societat), encara que en realitat la meva família està farta de la brutícia societat d'avui dia.

La sintaxi és:

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

Pot semblar una mica complex la comanda, anem a desglossar una mica i explicar-ho de forma una mica més simple 😉

• perl : El que farem servir, perl
• -Pi : Pi, com π (El de valor aproximat de 3.14)
• -e : La I imagínenla de «i d'executar» ^ - ^
• Després entre cometes » obrim amb una s i tanquem amb una g: «sg» ... imaginin la S de Start (iniciar) i la G de Game Over 😀
• Al seu torn entre la sg hem de posar dos jocs de claudàtors: [] y [], Quedant així: «S [] [] g»
• Dins dels primers claudàtors com vaig dir més amunt, anirà el text que desitgem treure i reemplaçar per un de nou, mentre que en el segon joc de claudàtors anirà el nou text a posar, seguint l'exemple: «S [la meva família] [nosaltres] g»

Simplement no?

L'explicació és en realitat molt més extensa que el necessari per a la comanda, és bastant senzill d'entendre 🙂

Perl és molt, moltíssim més que una forma per reemplaçar text, és tot un llenguatge 😉

Si desitgen aprendre més d'ell instal·lin el paquet perl-doc i tirin-li un ull a toooot el que permet, simplement és un univers diferent.

Per cert i per tancar, suposant que vulguin buscar tots els fitxers .txt que tinguin en $ HOME / Documents / i en cada un reemplaçar «la meva família» per «nosaltres», es pot unir find + perl per aconseguir això:

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

O bé usant un comodí:

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

El problema amb aquesta segona variant, és que no reemplaçarà en arxius que es troben en subcarpetes 🙂

En fi, espero que l'hagin trobat interessant. Per a mi ha estat realment útil, ja puc reemplaçar text directament des de la terminal ... genial! 😀