diff options
Diffstat (limited to 'listdrobpoxes.cgi')
-rwxr-xr-x | listdrobpoxes.cgi | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/listdrobpoxes.cgi b/listdrobpoxes.cgi index a6724d7..f2dec4f 100755 --- a/listdrobpoxes.cgi +++ b/listdrobpoxes.cgi @@ -6,13 +6,16 @@ use File::Basename; use lib dirname( __FILE__ ) . '/lib'; use rddb; +binmode(STDIN, ":utf8"); +binmode(STDOUT, ":utf8"); +binmode(STDERR, ":utf8"); + my $status = 'ERROR'; my $errorstring = 'unknown'; my $responsecode = 500; my @dropboxes = (); my $q = CGI->new; - my $username = $q->param('LOGIN_NAME'); my $token = $q->param('PASSWORD'); @@ -32,7 +35,7 @@ if(defined $dbh) { rddb::closedb($dbh); } -print "Content-type: application/xml\n\n"; +print "Content-type: application/xml; charset=UTF-8\n\n"; if($responsecode != 200) { print "<RDWebResult>\n"; |