Mostrando entradas con la etiqueta centos redhat perl. Mostrar todas las entradas
Mostrando entradas con la etiqueta centos redhat perl. Mostrar todas las entradas

martes, 26 de agosto de 2008

Bug en perl (redhat)

Original: http://blog.vipul.net/2008/08/24/redhat-perl-what-a-tragedy/

Un fallo en los paquetes perl Red Hat 5 (Centos, Fedora) hace que la llamada para crear objetos sea muy costosa. Un código como:

#!/usr/bin/perl
use overload q(<) => sub {};
my %h;
for (my $i=0; $i<50000; $i++) {
$h{$i} = bless [ ] => 'main';
print STDERR '.' if $i % 1000 == 0;
}


Ejecutado en una de nuestras máquinas Centos 4 tarda 0.2 s, en las nuevas Centos 5 pasa a 12-14 s.