Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/perl/10.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
如何使用perl读取https JSON流?_Json_Perl_Https_Lwp - Fatal编程技术网

如何使用perl读取https JSON流?

如何使用perl读取https JSON流?,json,perl,https,lwp,Json,Perl,Https,Lwp,好的,我会尽量详细地说 我需要连接到传输JSON数据的https url,并通过REGEX搜索关键字作为数据流,然后将匹配的JSON元素解码并将其插入数据库 正则表达式的使用并不是一个相对简单的问题 我正在努力解决的是如何逐行读取数据。我已经尝试了一些我在网上找到的使用LWP的例子,但是流从未停止加载,脚本挂起 这是我最近的一次 #!/usr/bin/perl use strict; use warnings; use LWP::Simple; use IO::String; my $han

好的,我会尽量详细地说

我需要连接到传输JSON数据的https url,并通过REGEX搜索关键字作为数据流,然后将匹配的JSON元素解码并将其插入数据库

正则表达式的使用并不是一个相对简单的问题

我正在努力解决的是如何逐行读取数据。我已经尝试了一些我在网上找到的使用LWP的例子,但是流从未停止加载,脚本挂起

这是我最近的一次

#!/usr/bin/perl

use strict;
use warnings;
use LWP::Simple;
use IO::String;

my $handle = IO::String->new(get("https://stackoverflow.com"));
while (defined (my $line = <$handle>)) {
  print $line; #Inserted for testing

  #Decode and insert into DB here       
}
close $handle;
#/usr/bin/perl
严格使用;
使用警告;
使用LWP::Simple;
使用IO::String;
my$handle=IO::String->new(获取)https://stackoverflow.com"));
while(已定义(my$line=)){
打印$line;#插入测试
#在这里解码并插入数据库
}
关闭$handle;
数据的速度相当快,因此脚本必须高效

任何关于如何做到这一点的建议都会很好

谢谢 肖恩可以帮助你


也看看他比较和比较的地方

这对处理JSON有很大帮助,但我仍然无法将传入数据提供给JSON::SL。