Beefy Boxes and Bandwidth Generously Provided by pair Networks Frank
laziness, impatience, and hubris
 
PerlMonks  

Re^16: json return value

by stenasc (Novice)
on Jul 30, 2013 at 13:05 UTC ( #1047013=note: print w/ replies, xml ) Need Help??


in reply to Re^15: json return value
in thread json return value

Perl module was 3.15, upgraded to 3.63. Still no difference.

$VAR1 = undef;

returned after I do a post to the website. Also tried setting $CGI::PARAM_UTF8=0; but again no difference.

The following php lines allow the data to be decoded correctly but again I'm no php expert.

$post_body = file_get_contents('php://input'); $jdata = CJSON::decode($post_body);


Comment on Re^16: json return value
Download Code
Re^17: json return value
by Anonymous Monk on Jul 30, 2013 at 13:16 UTC
    so Dumper the $query

      Can you be more detailed please? What variable should I dump. Here is my current server side code.

      #!/usr/bin/env perl use strict; use warnings; use CGI (); use JSON::PP (); use Data::Dumper; $CGI::PARAM_UTF8=0; my $q = CGI->new; my $data = $q->param('POSTDATA'); my $json = JSON::PP->new->utf8; print $q->header("application/json"); print Dumper($data);

        Can you be more detailed please? What variable should I dump. Here is my current server side code.

        Dumper($q)

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1047013]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (6)
As of 2014-04-20 10:57 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (485 votes), past polls