Help for this page

Select Code to Download


  1. or download this
    eval {$respons = JSON::XS->new->decode ($res->content);} ;
print 'json decode error:'.$@ ."\n" if ($@);
  2. or download this
    eval {$respons = JSON::XS->new->decode ($res->decoded_content);} ;
print 'json decode error:'.$@ ."\n" if ($@);
  3. or download this
    use Encode;
eval {$respons = JSON::XS->new->decode (Encode::decode_utf8($res->deco
+ded_content));}; 
print 'json decode error:'.$@ ."\n" if ($@);