hi,

just a quick note for those folk out there running
lots of PERL DBI things etc with their FreeRADIUS
systems on CentOS/RHEL - theres been a problem with
PERL with this distro for some time - massive speed
penalty - over 100x slower than ubuntu/suse/etc etc

this quick PERL script should complete in a sub-second

#!/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;
      }


on an affected box it takes several seconds....anyway,
just to let people know that I can now confirm CentOS
have release their patch/fix so all is back to normal.
cannot confirm RHEL.  anyway, all PERL DBI stuff is now
back to the full speed.

alan
-
List info/subscribe/unsubscribe? See http://www.freeradius.org/list/users.html

Reply via email to