Perl, RegExp und Steuerzeichen...

Hallo NG,
kleines Problemchen, bei dem ihr mir bestimmt weiterhelfen könnt :-)
ich bekomme über eine serielle Leitung Daten eines Raid-Systems, welche
noch mit unglaublich hässlichen Steuerzeichen durchsetzt ist...
unter anderem findet man da "<esc>[K", "<esc>[3;3H"

nun meine Frage, wie kann ich diese Steuerzeichen mittels regulärer
Ausdrücke entfernen. Das Hex-Symbol für das <esc> ist die 0x1B...aber
wie bekommt man die da raus? Für Hilfe wäre ich sehr dankbar...

eine kleine Testzeile noch anbei
<esc>[3;3H<esc>[0mAdding( 7)55.3% <esc>[24;80H

MfG
Jan
Jan Teune [ Mi, 02 August 2006 15:58 ] [ ID #1415182 ]

Re: Perl, RegExp und Steuerzeichen...

Hat sich erledigt, danke :-)

Jan Teune wrote:
> Hallo NG,
> kleines Problemchen, bei dem ihr mir bestimmt weiterhelfen könnt :-)
> ich bekomme über eine serielle Leitung Daten eines Raid-Systems, welche
> noch mit unglaublich hässlichen Steuerzeichen durchsetzt ist...
> unter anderem findet man da "<esc>[K", "<esc>[3;3H"
>
> nun meine Frage, wie kann ich diese Steuerzeichen mittels regulärer
> Ausdrücke entfernen. Das Hex-Symbol für das <esc> ist die 0x1B...aber
> wie bekommt man die da raus? Für Hilfe wäre ich sehr dankbar...
>
> eine kleine Testzeile noch anbei
> <esc>[3;3H<esc>[0mAdding( 7)55.3% <esc>[24;80H
>
> MfG
> Jan
Jan Teune [ Mi, 02 August 2006 16:22 ] [ ID #1415183 ]

Re: Perl, RegExp und Steuerzeichen...

Jan Teune schrieb:
> Hat sich erledigt, danke :-)
>
Schade, grade wollt ich schreiben dass die meisten Programme wenn man
ihnen einen PIPE-Status setzt die ganzen Steuerzeichen eh nicht mit
ausgegeben (z.B. LS)

Sowas wie
ls --color=auto | cat

sieht schon sehr anders aus als

ls --color=auto


P.S.: Alle console codes: man console-codes
http://realizer.byus.net/pds/unix_man/console_codes.4.html (thx google)

--
$_='';s%%`^.*`s;.*;uhtnmo;;a>lha~a>inu~a>fmk~a>rou~a>duM~a>b tl~s;&&&&&&;
!d1!l2!b3!i4!f5!r6q(?);e;Z``}a>&&&`sub# "1#{#"_=shift#;s^"2^"3#^;``;~`
return #"_#}``^!&&`"1(#""2)#\.`Z%x;s~Z~print~g;s/#/\\/g;
s/`(.)(.+?)`(.+?)`/s$1$2$1$3$1g\;/gsx;s;&;(.);g;y^"^$^;print ;
Maluku [ Do, 03 August 2006 03:21 ] [ ID #1416579 ]
Perl » de.comp.lang.perl.misc » Perl, RegExp und Steuerzeichen...

Vorheriges Thema: Can't locate HTML/Template.pm in @INC
Nächstes Thema: SIG CHLD unter Windows