perl 解析xml ,json文件及curl工具的使用

网友投稿 982 2022-08-25

perl 解析xml ,json文件及curl工具的使用

perl 解析xml ,json文件及curl工具的使用

1.解析xml

用到两个包:

# use moduleuse XML::Simple;use Data::Dumper;

过程:

# create object$xml = new XML::Simple;#解析$data = $xml->XMLin(xml文件名);#取值my $value=$data->{节点名字}如果有子节点则为 my $value=$data->{节点名字}->{子节点名字};

2.解析json

用到的perl包

use JSON;use Data::Dumper;

要解析的jsco数据

#my $curl_result ='{"type": 1,"data": 2}';$hash = decode_json($curl_result); $type = $hash->{'type'}. "/n"; $data = $hash->{'data'}. "/n";

则type及data的值解析出来。。。

3.perl 调用curl库

use WWW::Curl::Easy;

my $res = $curl->setopt(CURLOPT_URL,​​baidu.com​​);

open(my $fileb,">"/home/someone/file);

$curl->setopt(CURLOPT_WRITEDATA,$fileb);

my $retcode=$curl->perform;

close($fileb);

版权声明:本文内容由网络用户投稿,版权归原作者所有,本站不拥有其著作权,亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容,请联系我们jiasou666@gmail.com 处理,核实后本网站将在24小时内删除侵权内容。

上一篇:LeetCode-1344. Jump Game V
下一篇:Accept() scalability on Linux
相关文章

 发表评论

暂时没有评论,来抢沙发吧~