Gossamer Forum: General: Perl Programming: ucfirst with acute character?

Sep 21, 2005, 6:54 PM

tandat

Enthusiast (809 posts)

Sep 21, 2005, 6:54 PM

Post #1 of 3

Shortcut

ucfirst with acute character?

Hi,

I thought it were easy in perl but not. I want the $var="CRÉDIT" to be print out as "Crédit". So I use the command ucfirst(lc($var)); but the result is "CrÉdit".

Is there any settings before the command so that this function can work as expectedly?

Thanks!

Cheers,

Dat

Programming and creating plugins and templates
Blog

Sep 22, 2005, 12:21 AM

Andy

Veteran / Moderator (18441 posts)

Sep 22, 2005, 12:21 AM

Post #2 of 3

Shortcut

Re: [tandat] ucfirst with acute character? In reply to

Hi,

Just try this;

Code:
my @fields = split /\n/, qq{É é 
...more charachters to be changed 
É é 
É é 
É é 
É é 
É é 
..etc 
}; 

foreach (@fields) {  
 my ($orig,$replace) = split / /, $_; 
 $var =~ s|\Q$orig|$replace|sig; 
}

Unfortunatly, I don't think uc(), lc(), or ucfirst() take into account foreign charachters Frown

Cheers

Andy (mod)
andy@ultranerds.co.uk

Sep 22, 2005, 12:31 AM

tandat

Enthusiast (809 posts)

Sep 22, 2005, 12:31 AM

Post #3 of 3

Shortcut

Re: [Andy] ucfirst with acute character? In reply to

Thanks for your reply Andy!

I also tried to use the 'use locale' but that seems not working.
So I have to replace these characters manually as your suggestion.

Cheers,

Cheers,

Dat

Programming and creating plugins and templates
Blog