[CentOS-devel] slow Perl on CentOS 5

Sun Aug 31 13:09:55 UTC 2008
Fabian Arrotin <fabian.arrotin at arrfab.net>

Karanbir Singh wrote:
> Karanbir Singh wrote:

> 
> There is now a perl package in the c5-testing repo that fix's these 
> issues. Unless I hear reports of breakage in the next 24 hrs, will push 
> that out via the fasttrack repo and make some announcements.
> 
> Also, if you do test it - and it does work fine : let us know about that 
> too.
> 
> Regards,
> 
> - KB

I've just updated a tmp DomU machine :
Without the updated perl :
time /tmp/perlbug.pl
..................................................
real    0m21.473s
user    0m21.345s
sys     0m0.044s

with perl.x86_64 4:5.8.8-10.el5_2.3.centos from Testing :
time /tmp/perlbug.pl
..................................................
real    0m0.214s
user    0m0.188s
sys     0m0.024s

The test was run several times with approximatively the same results 
(and after a reboot too)
The perl script used was the one someone posted on the CentOS list 
recently :

------------- bug test ----------
#!/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;
}
----------------- end snip ------------

I'll test on other machines but i admit i'm not a Perl user myself nor 
have perl scripts that i use for day-to-day operations

-- 
-
Fabian Arrotin <fabian.arrotin at arrfab.net>
"Internet network currently down, TCP/IP packets delivered now by 
UPS/Fedex ..."