Re: ÉÚÍÅÒÅÎÉÅ ÐÅÒÆÏ
Greg Belenky
greg на webzavod.ru
Сб Сен 27 19:01:30 CDT 2003
> а почему не :
> ? это проще вставить в готовый скрипт ;)
ну.. я использую Бенчмарк для того, чтобы выяснить, какая программная
конструкция работает быстрее. обычно это маленькие кусочки кода и использую
я cmpthese...
> И у меня будут, раз этот Benchmark входит в поставку ;)
мне не больно понравилось, в каком виде это все выдается...
Time::HiRes ловчее ;)
например:
use strict;
use Benchmark;
use Time::HiRes;
my $t1 = Benchmark->new();
my $h1 = time();
sleep(5);
my $i = 1;
$i++ for (1...100_000);
my $h2 = time();
my $t2 = Benchmark->new();
print timestr(timediff($t2, $t1), 'auto', '.05f'), "\n";
printf "%.5f\n", $h2 - $h1;
__END__
Подробная информация о списке рассылки Samara-pm