[SP-pm] RedHat Perl Sucks, e o CentOS vaii junto

Eden Cardim edencardim at gmail.com
Thu Aug 28 13:15:44 PDT 2008


2008/8/27 Luis Motta Campos <luismottacampos em yahoo.co.uk>:
> http://perlenespanol.baboonsoftware.com/foro/viewtopic.php?t=3037
> https://bugzilla.redhat.com/show_bug.cgi?id=379791
> https://bugzilla.redhat.com/show_bug.cgi?id=196836

Esse teste que está sendo disseminado nesses posts não é muito
preciso, pois faz acesso a hash e realiza IO durante o benchmark,
fazendo o problema aparentar ser mais grave do que realmente é. Uma
versão mais correta pra testar bless/overload:

#!/usr/bin/perl
use overload q(<) => sub {};
use Benchmark qw(:all);

timethis(500000, sub{(bless [ ] => 'main')<1});

SLACK: timethis 500000:  0 wallclock secs ( 0.72 usr +  0.00 sys =
0.72 CPU) @ 694444.44/s (n=500000)
RH: timethis 500000:  5 wallclock secs ( 5.33 usr +  0.00 sys =  5.33
CPU) @ 93808.63/s (n=500000)

Que ainda é muito ruim.

-- 
edenc.vox.com


More information about the SaoPaulo-pm mailing list