| Jeff Abrahamson on 17 Sep 2004 15:39:02 -0000 |
|
On Fri, Sep 17, 2004 at 06:17:01AM -0400, Jeff Abrahamson wrote: > So I really think that what I want is a program that translates the > *contents* of my email correctly for the locale in which my terminal > emulator is set. The attached kludge translates those codes that I regularly see into iso-8859-1 codes that my terminal emulator understands. The encoding appears to be the same as the way subject lines and To/Cc/From lines are encoded, which is an important consideration. -- Jeff Jeff Abrahamson <http://www.purple.com/jeff/> +1 215/837-2287 GPG fingerprint: 1A1A BA95 D082 A558 A276 63C6 16BF 8C4C 0D1D AE4B A cool book of games, highly worth checking out: http://www.amazon.com/exec/obidos/ASIN/1931686963/purple-20 #!/bin/sh
BLUE="\033[0;34m\]"
RED="\033[0;31m\]"
PURPLE="\033[0;35m\]"
BLACK="\033[0;30m\]"
x=/tmp/mutt-view$$.txt
#echo $RED
tee $x | wc | awk '{printf(" [%d lines, %d words, %d characters]",$1,$2,$3);}'
perl -e '{print " Top characters:";}' < /dev/null
frequency 8 < $x
#echo $BLACK
echo
echo
cat $x | perl -pwe 's/\303\250/\350/g; # UTF-8 e-grave
s/\303\251/\351/g; # UTF-8 e-acute
s/\303\247/\347/g; # UTF-8 c-cedilla, upper-case=\307
s/\303\240/\340/g; # UTF-8 a-grave
s/\342\202\254/E/g; # UTF-8 euro symbol ?
s/\303\273/\373/g; # UTF-8 u-circumflex
s/\303\252/\352/g; # UTF-8 e-circumflex ?
s/\205/.../g;
s/\201\201\201\275/oe/g;
s/\201\201\201\342\200\223/---/g; # em-dash
s/\225/=>/g; # bullet?
s/[\223\224]/"/g;
s/[\226\227]/--/g;
s/\201\201\201\262/"/g;
s/\201\201\201\263/"/g;
'| \
perl -pwe "s/\222/'/g; s/\221/'/g;
s/\201\201\201\271/'/g;
s/\201\201\342\200\231/'/g;
"
#cat $x
/bin/rm -f $x
Attachment:
signature.asc
|
|