text editor

[Giorgos Keramidas]

On 2007-06-07 11:17, Nikos Kouvaris <nkoub at chem.demokritos.gr> wrote:
> aaa, ok.
> nei kati tetoio psaxnw. 8alw apla na xrwmatizw kapoia output apo
> merika programmata pou trexw.
> p.x.: an h exodos einai h:
>
>         xysyyxxysxy
>         xxxssyysxys
>         syxxysyyxsx
>
> 8elw se ena text arxeio na thn deixnw ws
>
>         xysyyxxysxy
>         xxxssyysxys
>         syxxysyyxsx
>
> dhladh enan editor antistoixo me to wordpad twn windows

Προσοχή με τα HTML email, γιατί το κείμενο μπορεί να φαίνεται με τον
παρακάτω σουρεαλιστικό τρόπο σε terminal:

    http://people.freebsd.org/~keramida/html-email.png

Καταλαβαίνεις διαφορά μεταξύ του πρώτου `xxxssyysxys' και του δεύτερου
`xxxssyysxys';  Εγώ όχι ιδιαίτερα :-)

Αν αυτό που θέλεις είναι απλά να "χρωματίσεις" το text output από κάποια
προγράμματα μπορείς να το κάνεις με έναν εξίσου unportable, αλλά πιο
εύκολο τρόπο:

    http://people.freebsd.org/~keramida/cdiff.png

Το cdiff είναι ένα μικρό πανάθλιο Perl script, που εισάγει ANSI escape
sequences για να τυπώνεται χρωματιστό το κείμενο:

    #!/bin/sh
    perl -pe '
    while (s/\t/" " x (8 - ((length($`)-1) % 8))/e) {}
    s/^(\+.*)$/\033[34m$1\033[m/o;
    s/^(-.*)$/\033[31m$1\033[m/o
    	if !s/^(--- \d+,\d+ ----.*)$/\033[1m$1\033[m/o;
    s/^(\*\*\* \d+,\d+ *\*\*\*.*)$/\033[1m$1\033[m/o;
    s/^(\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*)$/\033[1m$1\033[m/o;
    s/^(!.*)$/\033[35m$1\033[m/o;
    s/^(@@.*$)/\033[35m$1\033[m/o;
    ' $@ | less -r

Προφανώς αυτό δεν είναι τόσο "mouse-addicted user friendly", αλλά
δε χρειάζεται να στήσεις ολόκληρο "Kate" για να δεις χρωματάκια :-)