perl对象中的grepHTTP响应

perl对象中的grepHTTP响应,perl,object,Perl,Object,我在一个perl对象(http::Tiny)中有一个http响应,我试图从中提取特定的值,但正匹配返回整个对象,而不仅仅是我想要的值。如何从对象中提取所需的线或值 for my $url (@urls) { print $url."\n"; $response = $http->get("$url"); my ($res) = grep {/href/} $response->{content}; print $res; } Perl中的grep与同名的命令行程序不太相似。它适用

我在一个perl对象(http::Tiny)中有一个http响应,我试图从中提取特定的值,但正匹配返回整个对象,而不仅仅是我想要的值。如何从对象中提取所需的线或值

for my $url (@urls) {
print $url."\n";
$response = $http->get("$url");
my ($res) =  grep {/href/} $response->{content};
print $res;
}

Perl中的grep与同名的命令行程序不太相似。它适用于数组而不是文本行。请尝试以下方法:

my ($res) =  grep {/href/} split(/\n/, $response->{content});

split
会将您
获取的文档
转换为一个行数组,这样
grep
将实现您期望的功能。
grep
在Perl中与同名的命令行程序不太相似。它适用于数组而不是文本行。请尝试以下方法:

my ($res) =  grep {/href/} split(/\n/, $response->{content});

split
将把您
获取的文档变成一个行数组,这样
grep
将实现您期望的功能。

或者由于您放弃了除第一个匹配项以外的所有匹配项,
my($res)=$response->{content}=~/^(.*href.*)/m
或者由于您放弃了除第一个匹配项以外的所有匹配项,
my($res)=$response->{content}=~/^(.*href.*)/m