[Trennmuster] Perl-Turbo

[Werner LEMBERG]

Hallo Georg!


Hiere eine Verbesserung Deines Skripts.


    Werner


======================================================================


#!/bin/sh
#
# merge-wordlists.sh
#
# Füge mehrere Wortlisten zu einer Wortliste zusammen.
# Eingabe: ein oder mehrere Dateinamen.
# Ausgabe ist nach stdout.

LANG=de_DE.utf-8
export LANG

cat $@ \
| sed -e '/^#/d' \
      -e 's/	 /\
/' \
| sed -e 's/;.*//' \
      -e 's/[-=·.|]//g' \
| sort \
| uniq -i

# eof

Aufrufbeispiel:

sh merge-wordlists.sh \
  /home/gp/workspace/wortliste/wortliste \
  /home/gp/workspace/wortliste/pre-1901 \
  /home/gp/workspace/silben/wortliste \
  > mywl