Perl Rest ::客户端尽管设置超时

时间:2014-07-07 18:32:08

标签: perl rest

我在perl中遇到了Rest::Client模块的问题。尽管将超时值设置为10分钟,但我的连接在5分钟后超时。我甚至尝试增加模块本身的硬编​​码默认值,但无济于事:

$client = REST::Client->new(timeout => 1200);
$client->setHost('https://www.example.com');
$client->addHeader('Content-Type', 'text/x-json');
$client->setTimeout(1200);

我更改的模块中的代码,从第336行开始:

my $ua = $self->getUseragent();
if(defined $self->getTimeout()){
    $ua->timeout($self->getTimeout);
}else{
    #$ua->timeout(600);
    $ua->timeout(1200);
}
my $req = HTTP::Request->new( $method => $url );

尽管有这些变化,我的要求仍然会在5分钟后超时。我收到了500回复。是否还有其他地方可以在依赖模块中对5分钟值进行硬编码?

0 个答案:

没有答案