2011-03-01T18:09:33 lukastonner

Hallo,

Code: (dl )

perl -p -i.old -nle 's/\/(\w+)(\d{8})/\/\2\/\1\2/;print $_;' $inputdirectory/update.txt

schreib mal nur


Das -p impliziert schon den print-Befehl, und Du führst ihn dann nochmal explizit aus.
Das zusätzliche -n ist auch wenig hilfreich, und ob Du -l wirklich brauchst, kannst Du in perldoc perlrun nachsehen.

edit:
1. Es sieht nicht mehr ganz so mikadomäßig aus, wenn Du im s///-Befehl nicht / als Delimiter verwendest, sondern ein Zeichen, das möglichst in der RegEx nicht auftaucht edit2: und Du brauchst den / nicht escapen, was nochmal übersichtlicher wird :)
2. statt der Backreferences \1 etc. besser $1 etc. verwenden

Editiert von FIFO: ein ~ zuviel, entfernt ...

Editiert von FIFO: edit2
Last edited: 2011-03-02 11:12:57 +0100 (CET)