Thanks it's a lot easier now
-----Original Message-----
From: Gunnar Hjalmarsson [mailto:[EMAIL PROTECTED]
Sent: 02 July 2004 14:49
To: [EMAIL PROTECTED]
Subject: Re: regexp cleanup
Laurent Coudeur wrote:
> Trying to clean up a mass of replacement
>
> here is a small bit
>
> $export=~s/\\'F5/õ/gi;
> $export=~s/\\'F6/ö/gi;
> $export=~s/\\'F7/÷/gi;
> $export=~s/\\'F8/ø/gi;
> $export=~s/\\'F9/ù/gi;
> $export=~s/\\'FA/ú/gi;
> $export=~s/\\'FB/û/gi;
> $export=~s/\\'FC/ü/gi;
Try replacing those with:
$export =~ s/\\'(\w\w)/chr hex $1/eg;
perldoc -f hex
perldoc -f chr
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
--
To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL
PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
