Michelle Konzack schrieb am Donnerstag, 24. Februar 2005 um 15:06:24 +0100:
> Also irgendwas bastelt qouted-printable und "e" in meine Messages...
> Gesendet habe ich sie nicht.
>
vielleicht beschreibst Du mal in Worten, was genau Du machen willst,
Deine Shell-schnipsel verstehe ich nicht
> Ist zwar nicht das was ich will, aber immerhin kann ich jetzt schon
> mal in 'mutt' ausgaben unterscheidbar machen:
>
> Dazu habe ich mir in meinem Attachmentfilter eine function eingebaut:
>
> __( '/usr/bin/tdfileview' )___________________________________________
> /
> | ANSI()
> | {
> | TDFV_LEN=`echo "$1" |wc -L |sed s/ //g`
Kranke Art die Länge eines strings zu bestimmen, was das sed am ende
noch macht verstehe ich erst recht nicht.
> | STRING=""
> | for i in `seq 1 $TDFV_LEN` ; do
> | CHAR=`echo $1 |cut --character=$i`
> | STRING=$STRING"$CHAR$CHAR"
qp scheint noch mehr mit deiner Mail zu machen, die ^H sehe ich erst
durchs beantworten.
> | done
> | echo "[[---- VViieewwiinngg wwiitthh ffiillt
> | teerr $STRING ----]]"
> | }
>
> wobei der Filter dann:
>
> | elif [ `echo "$IN" |grep -E ".deb$"` ] ; then
> | _A_N_S_I_ _"_2_4_ _(_v_._ _1_)_ _D_e_b_i_a_n_ _P_a_c_k_a_g_e_._"
> ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
>
> | ar p "$IN" control.tar.gz | tar xzO ./control
> | echo
> | echo $"[--Filelist:"
> | ar p "$IN" data.tar.gz | tar tzv | sed -r s/^.{20}//
kleines beispiel in perl:
---ansi.pl
#!/usr/bin/perl
use Term::ANSIColor;
print colored (join($", @ARGV), 'bold cyan on_white');
---ansi.pl
jeff@hitchhiker:~/perl$ ./ansi.pl das ist ein netter test text der in cyan fett auf weiss gedruckt wird
das ist ein netter test text der in cyan fett auf weiss gedruckt wirdjeff@hitchhiker:~/perl$
was natürlich in dieser Mail nicht rüberkommt. lässt sich natürlich
beliebig verfeinern :-)
ggf auch den ganzen filter in perl implementieren, dann kannst Du auch
einzelne worte hervorheben ...
--
Jörg Friedrich
There are only 10 types of people:
Those who understand binary and those who don't.
Attachment:
signature.asc
Description: Digital signature