[問題] RPC timeout 設定

[rick70002 (Wei)]

想請問用perl開發過RPC的webservice的高手,

如何設定RPC client端的timeout?

因為我的程式在 server端 需要長達5分鐘左右的運算時間,
但每次 server端 還沒運算完畢, client端 就timeout了.

client端 程式如下:

require Data::Dumper;
use Frontier::Client;

my $input="test";

my $SERVER_URL = 'http://localhost:8080';

my $client = Frontier::Client->new(url => $SERVER_URL);my $ret = $client->call('Fulltext.getAnnotation', $input);

print Data::Dumper::Dumper($ret);

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 140.116.245.199
→ frank1983:這樣有效嗎？ $client->{ua}->timeout(300); # 300 secs