如何在perl中检查哈希密钥是否包含JSON？

发布时间：2020-12-16 06:25:35 所属栏目：大数据来源：网络整理

导读：我正在向端点url发送请求,从那里我得到了 JSON形式成功的响应,但如果失败则返回某些文本. 发送请求： $data-{response} = $self-{_http}-send($myData); 所以在这之前： $resp = from_json($data-{response}); 我想检查响应是否是json格式.如何在Perl中处理

我正在向端点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";

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!