perl如何找到http请求完成的时间

Question

我有一张表格要填写并提交，它将返回结果。 现在，我想计算完成我的请求所花费的时间，即结果显示的时间-我单击提交的时间。

我不知道该怎么做。 请随时使用任何模块。 我不知道要使用哪个参数来检查是否显示响应页面。 我已经使用阅读结果页面的标题来检查响应是否正确显示。

我的代码：

use WWW::Mechanize;
use LWP::UserAgent;
my $m = WWW::Mechanize->new();
$m->get( "http://en.wikipedia.org/wiki/Main_Page" );
$m->submit_form(
    form_number => 1,
    fields    => { search  => 'honey', },
    button    => 'go'  #my time1 should start at this moment
);
#my time 2 should be recorded as soon as result page is displayed, i dont know what to use to get this time
$tmp=$m->title;
print "$tmp\n";

Answer 1

您可以使用WWW :: Mechanize :: Timed

Answer 2

您可以使用时间功能捕获提交请求时的时间，也可以捕获结果在脚本中显示结果后的时间。 然后两者的差异可以为您提供请求所需的时间。

否则，您也可以尝试WWW :: Mechanize :: Timed，如Pathak建议的那样。