Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

Re^2: 5:10: Why is this slower than 5.8.8?

by Anonymous Monk
on Dec 23, 2007 at 17:39 UTC ( #658789=note: print w/replies, xml ) Need Help??

in reply to Re: 5:10: Why is this slower than 5.8.8?
in thread 5:10: Why is this slower than 5.8.8?

usemymalloc=y will bring 20-30% more perfomance penalty! This is stupid trying to solve one slowdown by another slowdown. FreeBSD's malloc is faster than perl's malloc anyway.
  • Comment on Re^2: 5:10: Why is this slower than 5.8.8?

Replies are listed 'Best First'.
Re^3: 5:10: Why is this slower than 5.8.8?
by eserte (Deacon) on Dec 23, 2007 at 19:13 UTC
    Well, then try the following script
    my $max = 50000; my @l = ('a'..'z'); my @keys = map { join '', map $l[rand @l], 0..71 } 0..$max;
    On my system running this script with a perlmalloc-built perl is 600x (!) faster than with a sysmalloc-built perl:
    $ time /usr/local/src/perl-5.10.0-perlmalloc/perl -I/usr/local/src/per +l-5.10.0-perlmalloc/lib ~/trash/ 3.027u 0.435s 0:03.68 93.7% 1448+324155k 0+0io 0pf+0w $ time /usr/local/src/perl-5.10.0-sysmalloc/perl -I/usr/local/src/perl +-5.10.0-sysmalloc/lib ~/trash/ 405.090u 189.574s 13:01.52 76.0% 1466+495449k 0+0io 0pf+0w
    This is a pathological case, but this may happen with FreeBSD's malloc.
      You found one case on 10000. Other 9999 cases is slower with perl's malloc. And this is not the subject of the topic! Class::Accessor::Grouped anyway runs faster without perl's malloc and the problem is not in the type of malloc.
        This does not seem to be the public opinion in this topic. For example, FreeBSD's perl port contains the lines:
        @${ECHO} " WITHOUT_PERL_MALLOC=yes Use FreeBSD system m +alloc" @${ECHO} " (uses less memory, b +ut slower)
        And the hint file in the perl distribution used to have the following lines:
        4.*) # In FreeBSD 4 and 5 the system malloc is performance-wise # VERY bad for Perl-- we are talking of differences of not # one, but TWO magnitudes.
        This is not part of the default hint file anymore, but only because perl's malloc does not work with threaded builds, so Jarkko decided to always use the system's malloc.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://658789]
and the radiator hisses contentedly...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (7)
As of 2018-06-19 05:42 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (111 votes). Check out past polls.