ANSI Escape Sequenzen (Farben) entfernen - #82340 (Allgemeines zu Perl)

quetzalcoatl

2004-05-13 12:31

User since
2004-04-01
51 Artikel
BenutzerIn
[default_avatar]

Ok, hat sich erledingt.

Lösung:

Code: (dl )

perl -pe 's/\\033\[[0-9];[0-9][0-9]*m//g' boot.log |perl -pe 's/\\033\[71G//g' -

Und, um es gleich zu ändern:

Code: (dl )

perl -pi -e 's/\\033\[[0-9];[0-9][0-9]*m//g' boot.log && perl -pi -e 's/\\033\[71G//g' boot.log

Hallo,

nachdem ja mein eigener bootlogd gescheitert ist - hab ich mir nun den bootlogd vom sysvinit Projekt geholt.

Leider kann der überhaupt nix mit den Shell Farben anfangen.
Nun meine Frage: wie kann ich elegant mit RegEx diese ANSI Sequenzen entfernen.

Soweit ist meine (wirklich üble) Lösung:

Code: (dl )

--

Es muss doch dafür eine elegantere Lösung geben.
Weiß jemand eine?

Gruss,
quetzal

PS: bootlogd ist nicht schlecht - hab vorher meine inittab angepasst (damit ein auto-login funktioniert), beim starten hat er dann einfach nicht weiter gemacht - keine Fehlermeldung o.ä. - nachdem ich die Änderrung wieder rückgänig gemacht hatte - hab ich im boot.log den Fehler gesehen:

Code: (dl )

Thu May 13 10:06:51 2004: INIT: cannot execute "/sbin/login"
Thu May 13 10:06:51 2004: INIT: cannot execute "/sbin/login"
Thu May 13 10:06:51 2004: INIT: cannot execute "/sbin/login"
Thu May 13 10:06:51 2004: INIT: cannot execute "/sbin/login"

\n\n