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

[MrBiTS]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

> Como como eu havia pensado a diferença do Time::HiRes com o Benchmark
> nao foi muito diferente, mesmo pq ambos os testes forão feitos com a
> máquina dedicada para o teste.

O que mais me assusta não é isso. À partir do código abaixo:

<code>
#!/usr/bin/perl

use overload q(<) => sub {};
use Benchmark qw(timethese);

sub test {
        $h;
        $h = bless [ ] => 'main';
}

timethese(1E6, { 'tempo' => \&test });
</code>

temos o seguinte resultado.

P IV 3.2 GHZ, 2 GB RAM, Debian Sarge 32 Bits
============================================
mrbits at extranet:~$ perl teste.pl
Benchmark: timing 1000000 iterations of tempo...
     tempo:  2 wallclock secs ( 1.01 usr +  0.00 sys =  1.01 CPU) @
990099.01/s (n=1000000)


Xeon 1.60GHz Dual Core, 4 GB RAM
================================
mrbits at ads1 ~$ perl teste.pl
Benchmark: timing 1000000 iterations of tempo...
     tempo:  0 wallclock secs ( 1.10 usr +  0.00 sys =  1.10 CPU) @
909090.91/s (n=1000000)


- --

Um abraço

.0. MrBiTs - mrbits at linuxmasters.info
..0 GnuPG  -
http://keys.cardboard.net:11371/pks/lookup?op=get&search=0xAC37715A6DD1F186
000 http://www.mrbits.com.br


-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.9 (MingW32)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org

iEYEARECAAYFAki2//cACgkQrDdxWm3R8YYggACdEBbWTG5Wab3OqdzNTfpZnZUE
3toAmwabtEr5hgHg7HtnH8ubQCdXGM9P
=QWWa
-----END PGP SIGNATURE-----