我正在向端点url发送请求,从那里我得到了
JSON形式成功的响应,但如果失败则返回某些文本.
发送请求:
$data->{response} = $self->{_http}->send($myData);
所以在这之前:
$resp = from_json($data->{response});
我想检查响应是否是json格式.如何在Perl中处理这个问题,请帮助我
解决方法
你可以捕获from_json()抛出的异常,
my $resp; my $ok = eval { $resp = from_json("{}"); 1 }; $ok or die "Not valid json";
或者更简单,
my $resp = eval { from_json("rrr") }; $resp // die "Not valid json";