Print Json text from query string

perlCrazy has asked for the wisdom of the Perl Monks concerning the following question:

Hi,
I am creating URI and sending JSON string in URL. while recieveing not able to print. Cab somebody please help?

cleint request code snippet:

my $json = { 'username' => 'foo',
             'password' => 'bar',
};
my $encoded = to_json($json);
my $escaped = uri_escape($encoded);  #string.
my $query = '&inputparms='.$escaped;
my $url = $rest_url.$query;
print "$url\n";
my $response = $ua->post($rest_url);
my $content = undef;
if ($response->is_success) {
    $content = $response->content;
}
[download]

server side code snippet:

my $input  = $PARMS{inputparms};
print qq{Content-type: application/json; charset=utf8\n\n};

    my $in = from_json( $input, {utf8 => 1} );
    my $jsonDecode = encode_json($in);
    print "$jsonDecode\n";
[download]

Comment on Print Json text from query string Select or Download Code

Replies are listed 'Best First'.
Re: Print Json text from query string by Corion (Patriarch) on Sep 10, 2012 at 10:47 UTC
Please post self-contained relevant code. The code you show is not all code that is relevant. You don't show how `%PARMS` gets populated for example. Also, for a HTTP POST request, it is weird/uncommon to send the parameters in the URL string instead of as POST parameters. This may or may not contribute to a problem on the receiving end.	[reply] [d/l]
Re^2: Print Json text from query string by perlCrazy (Monk) on Sep 10, 2012 at 10:55 UTC
Thanks for the response. Yes, intentionally have not posted the entire code. Please assume that query string has JSON string and server code should read and print inputparms. if i get that part, issue should be resolved. Thanks again for your time.	[reply]
Re^3: Print Json text from query string by Corion (Patriarch) on Sep 10, 2012 at 11:04 UTC
So, if you already have verified that your server program does see the correct data, why are you still posting both halves of the application? Or did you not verify that your server program gets the correct data? If you already know that your server program receives data, why did you not hardcode the received data and checked it? Eliminating the client from the problem helps reduce the number of points of failure. I recommend you use CGI to parse your query data in the server program. If you are using hand-rolled code to parse the query data, please eliminate that in favor of CGI or another query parser module. You should be aware that there are multiple ways to pass query data in POST requests, and I already told you that your way of passing it is different from other ways. CGI can handle both ways, but it's unclear whether your unshown code can handle them	[reply]
Re^4: Print Json text from query string by perlCrazy (Monk) on Sep 10, 2012 at 11:11 UTC
Re^5: Print Json text from query string by Corion (Patriarch) on Sep 10, 2012 at 11:21 UTC
Some notes below your chosen depth have not been shown here
Re: Print Json text from query string by rpnoble419 (Pilgrim) on Sep 10, 2012 at 17:12 UTC
Why do you want to create a URL? it looks like you get JSON in from some ajax call, why not push JSON back? Otherwise you could just send the following: `print $url.'/'.$json->{'username'}.'/'.$json->{'password'}` [download] Also why are you passing passwords in the open?	[reply] [d/l]