On 05/08/00, "[EMAIL PROTECTED]" wrote:
> $string =~ s/(.)/$1\x00/g; # expand ANSI to UTF-8 (not the most
Slightly more efficient (~30% ?), but more to type, is:
$string = pack("Ax" x length $string, split("", $string));
Cheers,
Douglas Wilson
---
You are currently subscribed to perl-win32-users as: [[email protected]]
To unsubscribe, forward this message to
[EMAIL PROTECTED]
For non-automated Mailing List support, send email to
[EMAIL PROTECTED]
- Re: Finding and replacing a UNICODE string. Philip Newton
- Re: Finding and replacing a UNICODE string. Philip Newton
- RE: Finding and replacing a UNICODE string. kevin . burton
- Re: Finding and replacing a UNICODE string. Philip Newton
- Re: Finding and replacing a UNICODE string. Philip Newton
- RE: Finding and replacing a UNICODE string. kevin . burton
- RE: Finding and replacing a UNICODE string. kevin . burton
- Re: Finding and replacing a UNICODE string. Philip Newton
- Re: Finding and replacing a UNICODE string. Douglas Wilson
- Re: Finding and replacing a UNICODE string. Ned Konz
- RE: Finding and replacing a UNICODE string. Doug Wilson
- RE: Finding and replacing a UNICODE string. Doug Wilson
