On 12/20/2010 03:16 PM, zgrim wrote: > On 2010-12-20 13:44:42 +0200, Nicu wrote: >> On 12/20/10, Alin Iorga<[email protected]> wrote: >>> Salut, >>> >>> Incerc sa inlocuiesc diacritice cu non-diacritice. >>> >>> Am incercat si cu sed si cu perl cu ceva de genul instructiunii de mai >>> jos fara success. >>> >>> perl -pi -e "s/x{0103}/a/g" >>> >>> Aveti alte sugestii cum as putea face asta? >> ł >> perl -CIO -MUnicode::Normalize=NFKD -pe '$_=NFKD($_);s/[\pM\x{feff}]//g' >> >> soluţia nu-i perfectă (lasă în text ex. ł, ø, nu ştie să-l descompună >> pe æ în ae, etc) > Text::Unidecode pare sa stie de astea > > echo "ăâîșțşţĂÂÎȘȚŞŢæłø" | perl -CSDL -MText::Unidecode=unidecode -ne'print > unidecode($_)' > aaiststAAISTSTaelo > > Varianta asta merge peste tot pe unde am incercat.
Multumesc mult pentru ajutor. Alin. _______________________________________________ RLUG mailing list [email protected] http://lists.lug.ro/mailman/listinfo/rlug
