#!/bin/bash # Ten skrypt przekodowuje pliki pomiędzy iso8859-cp1250 # Można rozpowszechniać na licencji GNU. # # Ten plik może się przydać do przekodowania 'Wprowadzenia' # z ISO8859-2 na CP1250 USAGE="Przekodowanie plików TeXowych pomiędzy ISO-8859-2 a CP1250 Pliki winny mieć oznaczenie strony kodowej w postaci odpowiedniego wpisu: translate-file=il2-pl lub translate-file=cp1250pl Sposób wykorzystania: $0 pliki... " if test $# = 0 ; then echo "$USAGE" ; fi for i in $*; do perl -i.bak -e 'undef $/; $_ = <>; if (/translate-file=il2-pl/) { print STDERR "Przekodowanie iso8859 -> cp1250\n"; # zmienia tylko pierwsze wyst±pienie s/translate-file=il2-pl/translate-file=cp1250pl/ ; tr/ˇĆĘłŃÓ¦¬Ż±ćęłń󶼿/ĄĆĘłŃÓŚŹŻąćęłńóśźż/ ; s/\n/\r\n/gm; # unix2dos } elsif (/translate-file=cp1250pl/) { print STDERR "Przekodowanie cp1250 -> iso8859\n"; # zmienia tylko pierwsze wyst±pienie s/translate-file=cp1250pl/translate-file=il2-pl/ ; tr/ĄĆĘłŃÓŚŹŻąćęłńóśźż/ˇĆĘłŃÓ¦¬Ż±ćęłń󶼿/ ; s/\r//g; # dos2unix } else { print STDERR "Nieustalona strona kodowa *** nic nie robię\n"; } print "$_"; ' $i; done