blob: b1ffba45fa5d1b82be67ef34363402f6c355a9c4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
# ix.genkey : Generierung eines Sortierschluessels ohne Sonderzeichen
# Eingabe: string1 string2 ... \t num num ...
# Ausgabe: string1 string2 ... (ohne S.Z.) \t string1 string2 ... \t num num ..
#
# Ersetze global die Tilde durch Spaces
s/~/ /g
# kopiere die Zeile in den Zwischenpuffer
h
# alles hinter \t loeschen
s/ .*$//
# zum Sortieren loesche alle nicht - alphanumerischen Zeichen
s/[^a-zA-Z0-9 ]//g
# falls dabei eine leere Zeile rauskommt, setze ein Space rein
s/^$/ /
# kopiere die urspruengliche Zeile aus dem Puffer hinter den Speicher
G
# ersetze newline zwischen den Zeilen durch \t
s/\n/ /
# Falls ein Komma am Ende des Strings steht, loesche es
s/, / /
|