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

前端之家收集整理的这篇文章主要介绍了如何在perl中检查哈希密钥是否包含JSON?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我正在向端点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";

猜你在找的Perl相关文章