Thay thế văn bản bên trong tệp chỉ bằng một lệnh: perl

Trong những trường hợp nhất định, chúng tôi muốn thay thế văn bản trong tệp, ví dụ: thay đổi trong Document.txt mọi thứ mà "gia đình tôi" nói cho "chúng tôi." Để đạt được điều này, chúng ta có thể sử dụng trình soạn thảo văn bản ưa thích của mình (Kate, Gedit, SublimeText, v.v.) nhưng luôn tốt nếu biết các biến thể, các cách khác để đạt được kết quả tương tự

Nó xảy ra với biểu thức chính quy điều này có thể đạt được, lệnh sed đơn giản là tuyệt vời, nó có vô số biến thể và tùy chọn nhưng ... đối với những người chỉ muốn thay thế văn bản từ cách ít phức tạp nhất có thể, đối với họ, tôi mang đến biến thể đơn giản hơn nhiều này:

Sau ví dụ, chúng tôi có tệp Document.txt nằm ở $ HOME / Document.txt với văn bản sau:

(...) gia đình tôi Nó giống như tất cả chúng, giống như của bạn hoặc của hàng xóm của bạn. Trong thực tế gia đình tôi Chúng tôi cố gắng trở thành những người có trách nhiệm và trong mắt xã hội, đúng đắn về mặt chính trị và xã hội. Tuy nhiên, trong nhà tôi có một con cừu đen, và đó là vai trò của tôi LOL !. Tôi luôn là người không ngại nói ra những gì mình nghĩ (ngay cả khi điều đó dường như không đúng trong mắt xã hội), mặc dù trên thực tế, gia đình tôi đã chán ngấy việc chất bẩn xã hội ngày nay.

Với lệnh sau, bạn sẽ thay đổi «gia đình tôi"bởi"chúng tôi":

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

Thật đơn giản 🙂

Vì vậy, văn bản sẽ là:

(...) chúng tôi Nó giống như tất cả chúng, giống như của bạn hoặc của hàng xóm của bạn. Trong thực tế chúng tôi Chúng tôi cố gắng trở thành những người có trách nhiệm và trong mắt xã hội, đúng đắn về mặt chính trị và xã hội. Tuy nhiên, trong nhà tôi có một con cừu đen, và đó là vai trò của tôi LOL !. Tôi luôn là người không ngại nói ra những gì mình nghĩ (ngay cả khi điều đó dường như không đúng trong mắt xã hội), mặc dù trên thực tế, gia đình tôi đã chán ngấy việc chất bẩn xã hội ngày nay.

Cú pháp là:

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

Lệnh có vẻ hơi phức tạp, hãy chia nhỏ nó ra một chút và giải thích nó đơn giản hơn một chút 😉

• perl : Những gì chúng tôi sẽ sử dụng, perl
• -số Pi : Pí, thế nào π (giá trị gần đúng của 3.14)
• -e : Các E tưởng tượng nó để «e thực thi» ^ - ^
• Sau đó trong dấu ngoặc kép » chúng tôi mở bằng một s và chúng tôi kết thúc bằng một g: "sg" … Tưởng tượng chữ S cho Bắt đầu và chữ G cho Trò chơi Kết thúc 😀
• Rẽ giữa sg chúng ta phải đặt hai bộ dấu ngoặc: [] y [], theo cách đó: "S [] [] g"
• Bên trong dấu ngoặc đầu tiên như tôi đã nói ở trên, văn bản mà chúng ta muốn xóa và thay thế bằng một văn bản mới sẽ đi, trong khi trong tập hợp dấu ngoặc thứ hai, văn bản mới cần đặt sẽ đi theo ví dụ: "S [gia đình tôi] [chúng tôi] g"

Đơn giản phải không?

Lời giải thích thực sự rộng hơn nhiều so với những gì cần thiết cho lệnh, nó khá đơn giản để hiểu 🙂

Perl không chỉ là một cách để thay thế văn bản, nó còn là một ngôn ngữ toàn bộ whole

Nếu bạn muốn tìm hiểu thêm về nó, hãy cài đặt gói perl-doc và hãy xem những gì nó cho phép, nó chỉ là một vũ trụ khác.

Nhân tiện và để đóng, giả sử bạn muốn tìm tất cả các tệp .txt mà bạn có trong $ HOME / Documents / và trong mỗi tệp thay thế "gia đình của tôi" bằng "chúng tôi", bạn có thể tham gia find + perl để đạt được điều này:

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

Hoặc sử dụng ký tự đại diện:

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

Vấn đề với biến thể thứ hai này là nó sẽ không thay thế trong các tệp nằm trong thư mục con 🙂

Dù sao, tôi hy vọng bạn thấy nó thú vị. Đối với tôi, nó thực sự hữu ích, tôi đã có thể thay thế văn bản trực tiếp từ thiết bị đầu cuối ... tuyệt vời! 😀