/[webpac]/trunk/filter/unac_string_croatian.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Annotation of /trunk/filter/unac_string_croatian.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 164 - (hide annotations)
Sat Nov 22 22:04:05 2003 UTC (16 years, 7 months ago) by dpavlin
File size: 409 byte(s)
implemented filter which can replace (or be used together with) unac_string
from Text::Unaccent

1 dpavlin 164 # Alternative implementation for unac_string which supports charasters in
2     # Croatian language which isn't really accented (ð) but needs to be coverted
3     # to unaccented equivalent (d)
4    
5     sub unac_string {
6     my $charset = shift || return;
7     my $string = shift || return;
8     # $string = Text::Unaccent::unac_string($charset,$string);
9     # $string =~ tr/ðÐ/dD/;
10     $string =~ tr/èæ¾¹ðÈÆ®©Ð/cczsdCCZSD/;
11     return $string;
12     }
13    
14     1;

Properties

Name Value
cvs2svn:cvs-rev 1.1

  ViewVC Help
Powered by ViewVC 1.1.26