Re: Cannot get UTF-8 out of mod_perl

2007-11-16 Thread E R
On Nov 16, 2007 10:34 AM, Michael Lackhoff <[EMAIL PROTECTED]> wrote: > On 16.11.2007 17:08 Michael Peters wrote: > > binmode(STDOUT, ':utf8'); > > that did the trick, many thanks! > > - Michael Michael - what version of mod_perl are you using?

Re: Cannot get UTF-8 out of mod_perl

2007-11-16 Thread Michael Lackhoff
On 16.11.2007 17:08 Michael Peters wrote: > Is this a mod_perl problem? You didn't mention if it occurred in plain CGI or not. It would be difficult to port the application to plain CGI but you are right, I could have built an independent test script. But because I could swear I did UTF-8 in pla

Re: Cannot get UTF-8 out of mod_perl

2007-11-16 Thread E R
On Nov 16, 2007 10:08 AM, Michael Peters <[EMAIL PROTECTED]> wrote: > Michael Lackhoff wrote: > ... > I'm not sure if that works when using $r->print() though. mod_perl doesn't use Perl's filter layers. $r->print is an octet sequence interface, so you have to perform the encoding yourself before c

Re: Cannot get UTF-8 out of mod_perl

2007-11-16 Thread Michael Peters
Michael Lackhoff wrote: > use utf8; > sub streamtest { > my $self = shift; > $self->header_type('none'); # for streaming > # Write the content type to the client... > my $r = $self->param('r'); > $r->content_type( 'text/html; charset=utf-8' ); > > print q{ > > Str

Re: Cannot get UTF-8 out of mod_perl

2007-11-16 Thread Michael Lackhoff
On 16.11.2007 17:39 E R wrote: > On Nov 16, 2007 10:34 AM, Michael Lackhoff <[EMAIL PROTECTED]> wrote: >> On 16.11.2007 17:08 Michael Peters wrote: > >> > binmode(STDOUT, ':utf8'); >> >> that did the trick, many thanks! >> >> - Michael > > Michael - what version of mod_perl are you using? 2.0

Re: Cannot get UTF-8 out of mod_perl

2007-11-16 Thread E R
On Nov 16, 2007 10:42 AM, Michael Lackhoff <[EMAIL PROTECTED]> wrote: > > On 16.11.2007 17:39 E R wrote: > > > On Nov 16, 2007 10:34 AM, Michael Lackhoff <[EMAIL PROTECTED]> wrote: > >> On 16.11.2007 17:08 Michael Peters wrote: > > > >> > binmode(STDOUT, ':utf8'); > >> > >> that did the trick, ma

Cannot get UTF-8 out of mod_perl

2007-11-16 Thread Michael Lackhoff
Hello, I have a problem printing UTF-8 from mod_perl. The sample-/test-code looks like this: use utf8; sub streamtest { my $self = shift; $self->header_type('none'); # for streaming # Write the content type to the client... my $r = $self->param('r'); $r->content_type( 'text/ht