Re: 44 recetas para trabajar con Unicode en Perl
Publicado: 2012-06-12 02:46 @157
℞ 40: Comparación regional insensible al tamaño de caja y a los diacríticos
Ya sabe cómo comparar cadenas Unicode mientras ignora las diferencias en el tamaño de caja y de los diacríticos (℞ 39). Esta aproximación usa el algoritmo estándar de cotejo Unicode. Para realizar una comparación similar mientras se respete alguna regla específica de la configuración regional, use Unicode::Collate::Locale:
Artículo original (en inglés)
Ya sabe cómo comparar cadenas Unicode mientras ignora las diferencias en el tamaño de caja y de los diacríticos (℞ 39). Esta aproximación usa el algoritmo estándar de cotejo Unicode. Para realizar una comparación similar mientras se respete alguna regla específica de la configuración regional, use Unicode::Collate::Locale:
Using perl Syntax Highlighting
- my $de = Unicode::Collate::Locale->new(
- locale => "de__phonebook",
- );
- # ahora esto devuelve verdadero:
- $de->eq("tschüß", "TSCHUESS"); # note que ü => UE, ß => SS
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
Artículo original (en inglés)