[Moscow.pm] Perl 5.10.0 released

Andrew Shitov andy на shitov.ru
Вт Дек 18 21:34:28 PST 2007


> А ты не измерял его скорость? Он всё также в 3 раза медленнее 5.8.8 или
> что-то изменилось в лучшую сторону?

Теперь работает абсолютно одинаково (на не очень показательном примере
с заполнением массива случайными значениями и его многократной
сортировкой).

Это именно тот тест, на котором RC1 давал втрое худшие результаты.

...
my $tf = timeit($N, sub {@b = sort @a});
my $tr = timeit($N, sub {@c = reverse sort @a});
...

andrew-shitovs-computer:~/Documents/Samag/Perl 5.10/code self$ perl timing.pl
0.246316 wallclock secs ( 0.25 usr +  0.00 sys =  0.25 CPU) @
4000000.00/s (n=1000000)
0.270842 wallclock secs ( 0.27 usr +  0.00 sys =  0.27 CPU) @
3703703.70/s (n=1000000)
andrew-shitovs-computer:~/Documents/Samag/Perl 5.10/code self$
perl5.10 timing.pl
0.250644 wallclock secs ( 0.25 usr +  0.00 sys =  0.25 CPU) @
4000000.00/s (n=1000000)
0.268153 wallclock secs ( 0.27 usr +  0.00 sys =  0.27 CPU) @
3703703.70/s (n=1000000)


Быстрее стала работать split// (хоть и не во столько раз, восколько
объявил Aevar):

my $str = 'x' x 5000;
my $t = timeit($N, sub {@b = split //, $str});

andrew-shitovs-computer:~/Documents/Samag/Perl 5.10/code self$ perl timing1.pl
4.64517 wallclock secs ( 4.62 usr +  0.01 sys =  4.63 CPU) @ 215.98/s (n=1000)
andrew-shitovs-computer:~/Documents/Samag/Perl 5.10/code self$
perl5.10 timing1.pl
3.99819 wallclock secs ( 3.93 usr +  0.01 sys =  3.94 CPU) @ 253.81/s (n=1000)


-- 
Andrew Shitov
______________________________________________________________________
andy на shitov.ru | http://www.shitov.ru


Подробная информация о списке рассылки Moscow-pm