use utf8;
my $fh = $c->res->write_fh;
my $test = "\x{41f}\x{440}\x{43e}\x{431}\x{430}";
utf8::encode($test);
$fh->write($test);
On 20 February 2014 17:45, Sergey Dmitriev <[email protected]> wrote:
> Hello,
>
> I'm trying to put some utf8 strings as a part of Catalyst response as
> follows:
>
> $c->res->print ( ... )
> and
> $c->res->write( ... )
>
> line by line.
>
> However it dies with
>
> Wide character in syswrite at ..... IO/Handle.pm line 474
>
> Any ideas how can utf8 be written to response?
>
> E.g. set binmode on output handle. Cannot find how.
> Using Catalyst Runtime 5.90042.
>
> Thanks.
>
> HtH, Sergey Dmitriev
> "All that is necessary for evil to triumph is for good men to do nothing".
> -- Edmund Burke
>
> _______________________________________________
> List: [email protected]
> Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst
> Searchable archive: http://www.mail-archive.com/[email protected]/
> Dev site: http://dev.catalyst.perl.org/
>
--
//wbr, Dmitry L.
_______________________________________________
List: [email protected]
Listinfo: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/catalyst
Searchable archive: http://www.mail-archive.com/[email protected]/
Dev site: http://dev.catalyst.perl.org/
