string substiution char 192-255

[John]

Hi

I have a string which may contain European accented characters - chr(192)
to chr(255).

I need to replace those characters with Å (or whatever the number is)
so that it can be displayed in HTML.

I can use substr($string,$i,1) and walk through it checking for every
character in that range and build a new string.

However, is there a cleaner solution using $x~=s///?

I cannot see it.

Regards
John

 

[Mirco Wahab]

I have a string which may contain European accented characters - chr(192)
to chr(255).

I need to replace those characters with Å (or whatever the number is)
so that it can be displayed in HTML.

I can use substr($string,$i,1) and walk through it checking for every
character in that range and build a new string.

However, is there a cleaner solution using $x~=s///?

naíve solution:

my $text = '
à Ý X ó Õ Ø € Ç È Ê É ß and à and ò þ and @ and ± and Ç ô õ Å, Ý';

$text =~ s/([\xc0-\xff])/'&#'.ord($1).';'/eg;

just replace every character in range (between 0xC0 and 0xFF)
by a string contructed via /e in substitution.

Regards

Mirco

 

[Ben Morrow]

Hi

I have a string which may contain European accented characters - chr(192)
to chr(255).

I need to replace those characters with Å (or whatever the number is)
so that it can be displayed in HTML.

I can use substr($string,$i,1) and walk through it checking for every
character in that range and build a new string.

However, is there a cleaner solution using $x~=s///?

HTML::Entities (which will also do <, >, & and " for you).

Ben

 

[John]

I have a string which may contain European accented characters -
chr(192) to chr(255).

I need to replace those characters with Å (or whatever the number
is) so that it can be displayed in HTML.

I can use substr($string,$i,1) and walk through it checking for every
character in that range and build a new string.

However, is there a cleaner solution using $x~=s///?

naíve solution:

my $text = '
à Ý X ó Õ Ø € Ç È Ê É ß and à and ò þ and @ and ± and Ç ô õ Å, Ý';

$text =~ s/([\xc0-\xff])/'&#'.ord($1).';'/eg;

just replace every character in range (between 0xC0 and 0xFF)
by a string contructed via /e in substitution.

Regards

Mirco

Many thanks.

I couldn't work out how to link the chr() and the ord().

It's clear now.

Much appreciated.

Regards
John