[linux] Re: Strip ansi

[Kees Theunissen]

On Sun, 23 Oct 2005, Hugo van der Kooij wrote:

>Voordat Panda hun uitvoer weer veranderde werkt het volgende blok
>filtering redelijk goed:
>
>   $line =~ s/\x1b\[m//g;
>   $line =~ s/\x1b\[.m//g;
>   $line =~ s/\x1b\[..m//g;
>   $line =~ s/\x1b\[.;.m//g;
>   $line =~ s/\cO//g;
>   $line =~ s/\cM$//;
>   $line =~ s/\cL//g;
>   $line =~ s/....\cH\cH\cH\cH//g;
>   $line =~ s/...\cH\cH\cH//g;
>   $line =~ s/..\cH\cH//g;
>   $line =~ s/.\cH//g;
>
>Een dirty stuk code maar het werkte op dat moment.


Het volgende werkt redelijk goed op jouw panda.lst file:

sed -e 's/[[:cntrl:]]\[[[:digit:]]*.//g'  \
    -e 's/[[:cntrl:]](B[[:digit:]]\+.//g' \
    -e 's/[[:cntrl:]](B//g'   < panda.lst > panda.cleaned

Ook dirty en niet perfect, maar het ruimt behoorlijk op.
Dat panda maakt er wel een zooitje van zeg!



Groeten,

Kees.

-- 
Kees Theunissen
F.O.M.-Instituut voor Plasmafysica "Rijnhuizen", Nieuwegein
E-mail: theuniss op rijnh.nl,     Tel: 030-6096724,     Fax: 030-6031204