utf8 issue with substitution pattern
- From: vorxion@xxxxxxxxxxxxxxxxxxxxxxxxx (Vorxion)
- Date: 18 Apr 2005 21:30:52 -0400
I don't know how to solve this. The program I have runs fine under plain
old perl. However, perl2exe makes it clear that I need to manually include
the utf8 stuff.
I'm forced to do:
use Encode::Unicode;
require "utf8_heavy.pl";
require "unicore/lib/SpacePer.pl";
require "unicore/To/Lower.pl";
require "unicore/To/Upper.pl";
require "unicore/To/Fold.pl";
require "unicore/lib/Digit.pl";
require "unicore/lib/Word.pl";
require utf8;
no utf8;
However, while the program runs fine under the interpreter directly, using
perl2exe results in the following not working, with a bunch of errors like:
Malformed UTF-8 character (overflow at 0xffbc2000, byte 0x00, after start
byte 0xff) in substitution (s///) at /root/LightPage/LP line 627, <> line
202.
Malformed UTF-8 character (overflow at 0xffbc2000, byte 0x00, after start
byte 0xff) in substitution (s///) at /root/LightPage/LP line 627, <> line
202.
etc...
My function is the following, and it's the substitution line that generates
those issues:
##### Strip binary characters.
sub strip_binary {
foreach my $one (@file_lines) {
$one =~ s/[\000-\037\177-\377]//g;
}
return;
}
#####
Can anyone tell me how to fix this issue? What's even stranger, the same
binary works fine on one linux system (Cobalt Linux) and -not- on RHEL3.
Any help is vastly appreciated... Thanks!
--
Vorxion - Founder of the knocking-shop of the mind.
"You have it, you sell it, you've still got it--what's the difference?"
--Diana Trent, "Waiting for God", on why a modelling agency is really a
knocking-shop. Applied by me to the field of consulting. :)
The Sci-Fi fan's solution to debt: Reverse the polarity on your charge card.
.
- Prev by Date: Re: my $hh = %hash
- Next by Date: How to export constants to a module?
- Previous by thread: my $hh = %hash
- Next by thread: How to export constants to a module?
- Index(es):
Relevant Pages
|
