Subject: | [Catalyst::Plugin::Server::XMLRPC] Unicode breaks rpc_client script |
Date: | Mon, 13 Apr 2009 18:52:08 +0800 |
To: | bugs-Catalyst-Plugin-Server [...] rt.cpan.org |
From: | Chris Davaz <cdavaz [...] gmail.com> |
action in MyApp::Controller::Root:
sub foo :XMLRPCLocal {
my ($self, $c) = @_;
$c->stash->{'data'} = '私はクリスです';
}
$ rpc_client -u http://localhost:3000/rpc -m foo
Show quoted text
-----------------Output-----------
Error:
not well-formed (invalid token) at line 1, column 127, byte 127 at
/usr/local/bin/rpc_client line 30
Bad code:
22 ### ok, so we can't actually get this object *ANY OTHER*
23 ### sodding way :(
24 {
25 local $^W;
26 my $code = XML::Parser::ExpatNB->can('parse_more');
27 *XML::Parser::ExpatNB::parse_more = sub {
28 my $obj = shift;
29 print $_[0].$/ if $main::opts{'d'};
30 return $code->( $obj, @_ );
31 }
32 }