Ganti teks di dalam file hanya dengan satu perintah: perl

Pada kesempatan tertentu kami ingin mengganti teks di dalam file, misalnya, perubahan Document.txt segala sesuatu yang dikatakan "keluarga saya" untuk "kita". Untuk mencapai ini, kita dapat menggunakan editor teks pilihan kita (Kate, Gedit, SublimeText, dll) tetapi selalu baik untuk mengetahui variannya, cara lain untuk mencapai hasil yang sama

Itu terjadi dengan ekspresi reguler ini dapat dicapai, perintah sed sangat bagus, memiliki varian dan opsi yang tak ada habisnya tetapi ... bagi mereka yang hanya ingin mengganti teks dari cara yang paling tidak rumit, bagi mereka, saya menghadirkan varian yang jauh lebih sederhana ini:

Mengikuti contoh, kami memiliki file Document.txt berlokasi di $ HOME / Document.txt dengan teks berikut:

(...) keluarga saya Ini seperti semuanya, seperti milik Anda atau tetangga Anda. Faktanya keluarga saya Kami mencoba untuk menjadi orang yang bertanggung jawab dan di mata masyarakat, secara politis dan sosial benar. Namun, di rumah saya ada kambing hitam, dan itulah peran saya LOL!. Saya selalu menjadi orang yang tidak takut untuk mengatakan apa yang dia pikirkan (meskipun tampaknya tidak benar di mata masyarakat), meskipun pada kenyataannya keluarga saya sudah muak dengan kotoran masyarakat saat ini.

Dengan perintah berikut, Anda akan mengubah «keluarga saya" oleh "kita":

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

Sesederhana itu 🙂

Jadi teksnya adalah:

(...) kita Ini seperti semuanya, seperti milik Anda atau tetangga Anda. Faktanya kita Kami mencoba untuk menjadi orang yang bertanggung jawab dan di mata masyarakat, secara politis dan sosial benar. Namun, di rumah saya ada kambing hitam, dan itulah peran saya LOL!. Saya selalu menjadi orang yang tidak takut untuk mengatakan apa yang dia pikirkan (meskipun tampaknya tidak benar di mata masyarakat), meskipun pada kenyataannya keluarga saya sudah muak dengan kotoran masyarakat saat ini.

Sintaksnya adalah:

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

Perintahnya mungkin tampak agak rumit, mari kita uraikan sedikit dan jelaskan sedikit lebih sederhana 😉

• perl : Apa yang akan kami gunakan, perl
• -pi : Pí, bagaimana π (nilai perkiraan 3.14)
• -e : E membayangkannya untuk «e mengeksekusi» ^ - ^
• Kemudian dalam tanda kutip » kami buka dengan s dan kami menutup dengan a g: "sg" … Bayangkan S untuk Memulai dan G untuk Game Over 😀
• Putar di antara sg kita harus meletakkan dua set tanda kurung: [] y [], menjadi seperti itu: "S [] [] g"
• Di dalam tanda kurung pertama seperti yang saya katakan di atas, teks yang ingin kita hapus dan ganti dengan yang baru akan masuk, sedangkan di tanda kurung kedua, teks baru yang akan dimasukkan akan masuk, mengikuti contoh: "S [keluargaku] [kita] g"

Sederhana bukan?

Penjelasannya sebenarnya jauh lebih luas daripada yang diperlukan untuk perintah, cukup sederhana untuk dipahami 🙂

Perl lebih dari sekadar cara untuk mengganti teks, ia adalah bahasa lengkap 😉

Jika Anda ingin mempelajarinya lebih lanjut, instal paketnya perl-doc dan lihat whooodo apa yang memungkinkan, itu hanya alam semesta yang berbeda.

Ngomong-ngomong dan untuk menutup, dengan asumsi Anda ingin menemukan semua file .txt yang Anda miliki di $ HOME / Documents / dan di masing-masing file ganti "my family" dengan "us", Anda dapat bergabung dengan find + perl untuk mencapai ini:

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

Atau menggunakan wildcard:

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

Masalah dengan varian kedua ini adalah tidak akan menggantikan dalam file yang ada di subfolder 🙂

Bagaimanapun, saya harap Anda menganggapnya menarik. Bagi saya ini sangat berguna, saya sudah bisa mengganti teks langsung dari terminal ... bagus! 😀