Perl-Oneliner für das Arbeiten mit Textdateien

Veröffentlicht: März 28, 2015 in Oneliner
Schlagwörter:
entferne alle Leerzeilen

Beispiel: ohne Backupfile

perl -ni -e 'print unless /^$/' file.txt

Beispiel: mit Backupfile

perl -ni.bak -e 'print unless /^$/' file.txt

 

gebe alle Zeilen aus in dem ein RegEx exakt n-mal vorkommt

Beispiel: gebe alle Zeilen in file.txt aus in denen foo 3mal vorkommt

perl -ne 'print if ( ( () = /foo/g ) == 3 )' file.txt

gebe alle Zeilen in einem Bereich aus

Beispiel: gebe Zeile 10 bis 20 aus

perl -ne 'print if 10..20' file.txt

 

ersetze alle Vorkommen von foo durch bar

Beispiel: ohne Backupfile

perl -pi -e 's/foo/bar/g' file.txt

Beispiel: mit Backupfile

perl -pi.bak -e 's/foo/bar/g' file.txt

 

Textzeile einfügen

Beispiel: füge den Text „Neue Zeile“ in Zeile 10 ein

perl -pi -le 'print "Neue Zeile" if $. == 10' file.txt

Beispiel: wie oben nur werden alle Dateien geändert

perl -pi -le 'print "Neue Zeile" if $. == 10; close ARGV if eof' *.txt
Advertisements

Kommentar verfassen

Trage deine Daten unten ein oder klicke ein Icon um dich einzuloggen:

WordPress.com-Logo

Du kommentierst mit Deinem WordPress.com-Konto. Abmelden /  Ändern )

Google+ Foto

Du kommentierst mit Deinem Google+-Konto. Abmelden /  Ändern )

Twitter-Bild

Du kommentierst mit Deinem Twitter-Konto. Abmelden /  Ändern )

Facebook-Foto

Du kommentierst mit Deinem Facebook-Konto. Abmelden /  Ändern )

Verbinde mit %s