perl怎么读取一个mysql查询耗费的时间?

笨狗

rt
DBI里面有这个函数吗?

兰花仙子

原帖由 "笨狗" 发表：
rt
DBI里面有这个函数吗?

拿个钟来掐时间算嘛

笨狗

这个办法不错

m0925j

BENCHMARK(count,expr)
BENCHMARK()函数重复countTimes次执行表达式expr，它可以用于计时MySQL处理表达式有多快。结果值总是0。意欲用于mysql客户，它报告查询的执行时间。
mysql>; select BENCHMARK(1000000,encode("hello","goodbye");
+----------------------------------------------+
| BENCHMARK(1000000,encode("hello","goodbye") |
+----------------------------------------------+
|                                            0 |
+----------------------------------------------+
1 row in set (4.74 sec)

报告的时间是客户端的经过时间，不是在服务器端的CPU时间。执行BENCHMARK()若干次可能是明智的，并且注意服务器机器的负载有多重来解释结果。
mysql参考手册里的，不知道LZ是不是要这个

fandatou

有一个高精度计时模块。用这个
#使用高精度计时器模块
use Time::HiRes qw(gettimeofday);
#标定计时器开始工作       
        $before = gettimeofday;
#调用你的东东
        &shijincha($l_score,$h_ship);
                #标记结束时间
        $elapsed = gettimeofday-$before;
        print "You took $elapsed seconds.\n";