Good suggestion. It looks like that works for my simple open() example
but unfortunately it doesn't work when reading from sockets. What I am
trying to do is tell Perl that all incoming POST data is UTF-8 encoded
and flag it as such. The $r->read() call unfortunately doesn't abide
by the open pragma.
Looks like I might have to go dig through source :-)
Thanks again for the help.
On Wed, Mar 19, 2008 at 12:45 PM, André Warnier <[EMAIL PROTECTED]> wrote:
>
>
> André Warnier wrote:
> > One more thing to try : doing a
> > use open ':utf8';
> > in the global mod_perl startup script.
> >
>
> well, that works.
> Rob, that should probably help you.
> The difference with PERL_UNICODE "SAD" seems to be that it will not
> automatically consider @ARGV as utf-8.
>
>
>
>
>
> > Rob French wrote:
> >> Setting the environment variable has always worked. mod_perl can "see"
> >> the PERL_UNICODE variable is set based on the fact that the
> >> ${^UNICODE} variable is returning 63 (SDA). The problem is that it
> >> seems to ignore it.
> >>
> >> On Wed, Mar 19, 2008 at 12:01 PM, Dondi Stroma <[EMAIL PROTECTED]>
> >> wrote:
> >>> Maybe you need to use PerlSetEnv ?
> >>>
> >>>
> >>>
> >>> ----- Original Message -----
> >>> From: "Rob French" <[EMAIL PROTECTED]>
> >>> To: "André Warnier" <[EMAIL PROTECTED]>
> >>> Cc: <modperl@perl.apache.org>
> >>> Sent: Wednesday, March 19, 2008 2:41 PM
> >>> Subject: Re: [mp1] Can't get UTF8 input streams to automatically be
> >>> decoded
> >>> using PERL_UNICODE under mod_perl
> >>>
> >>>
> >>> I have tried setting it via Apache SetEnv directive as well as in my
> >>> environment as root when starting Apache. In both cases the variable
> >>> is correctly set in mod_perl it is just ignored.
> >>>
> >>> As another test I tried the same code as a plain ol' CGI script and it
> >>> works in that case. So the issue is definitely with mod_perl and its
> >>> interaction with the PERL_UNICODE env variable.
> >>>
> >>> Thanks for your help investigating. I was worried that it might be a
> >>> mod_perl 1.x thing or a Perl version thing. Good to know it isn't just
> >>> my setup :)
> >>>
> >>> Rgrds,
> >>> Rob
> >>>
> >>>
> >>
> >
>
