in reply to Re^3: pl script in webserver
in thread pl script in webserver

i tried it. and the code was working at my workstation before taking it to production. i dont expect to have any error in it. its just hosting i think. but even the hosting techs are like what. cant do anything. i would solve it if it was hosted on my space

use JSON::XS; use HTTP::Request::Common qw(POST); my $ua = LWP::UserAgent->new( ssl_opts => { verify_hostname => 0 }, ); $ua->agent("MyApp/0.1") my $req = HTTP::Request->new(POST => 'https://link'); $req->content_type('application/json'); my $res = $ua->request($req); $respons = JSON::XS->new->decode ($res->content); $ju = $respons->{data}->{data}; $ke = $respons->{data}->{data}}; print "Content-type: text/html\n\n"; print <<START_HTML; #html code START_HTML

Replies are listed 'Best First'.
Re^5: pl script in webserver
by huck (Prior) on Apr 09, 2017 at 05:37 UTC

    You do realize there are too many right braces in

    $ke = $respons->{data}->{data}};

      yes but its single right braces

        meaning?