[linux] script "bez diakritiky"

Misu linux na misu.sk
Pondělí Prosinec 11 12:39:57 CET 2006


man perlunicode

jednak je mozne oznacit konkretny retazec ako utf8, alebo nastavit 
pouzitie utf8 v celom skripte - use utf8. Ale odporucam si to poriadne 
nastudovat.

Misu

On Mon, 11 Dec 2006, Jan Nemsak wrote:

> perl vie robit aj so stringami utf8?
Asi ano ale ako?
ked skusim

$tmp = "abdfąýíµč»ýíąč";
$tmp =~ tr [ą] [s];
print $tmp;

tak mi to vrati zle, z jedneho s s makcenom mi to spravi dve s

kdezto
$tmp = "kjjfksdjksdjkds";
$tmp =~ tr [j] [J];
print $tmp;

funguje ok, vymeni vsetky j za J


ked pozrem zdrojak v hexa editore tak znaky z diaritikou su ako 2 bajty,
teda su v tom cez utf8

viem prinutit pracovat perl  tak aby robil so stringami v utf8?

j.

Jan Nemsak
zooom.sk s.r.o., Prievozska 32, 821 05 Bratislava
email: jan.nemsak na zooom.sk
www  : http://www.zooom.sk
tel  : +421 905 227 168
jaber: janko777 na jabber.cz
icq  : 59817311



Misu wrote:
> Ahoj,
>
> man perlop
>
> vyhladat si operator "tr"
>
> robi presne to iste ako strtr v php, samozrejme akurat syntax treba
> operlit :)
>
> Misu
>
> On Mon, 11 Dec 2006, Jan Nemsak wrote:
>
>> Ahojte
> Potreboval by som previest nazvy vacsieho mnozstva suborov na nazvy bez
> diakritiky.
> V php mam taku funciu sikovnu ze :
>
> function bez_diakritiky($string) {
> return strtr($string,
> '�ӎ������������������������������������������������������������������',
> 'SOZsozYYuAAAAAAACEEEEIIIIDNOOOOOOUUUUYsaaaaaaaceeeeiiiionoooooouuuuyy');
> }
>
> prve je mnozina znakov s diaktritikou, druha je to iste ale bez ,
> funguje pekne...
> neda sa nieco podobne v perli? nemate niekto nieco take?
> Dakujem
>
> j.
>
> ------------------------------------------------------------------------
>
> _______________________________________________
> https://lists.linux.sk/mailman/listinfo/linux
> Prehladavanie archivu: http://search.lists.linux.sk
> Meta FAQ: http://www.sklug.sk/lists/linux/metafaq.html


Daląí informace o konferenci linux