Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?

Re^5: Benchmark, -s versus schwartzian (vs hash)

by ambrus (Abbot)
on Aug 23, 2004 at 11:56 UTC ( #385064=note: print w/replies, xml ) Need Help??

in reply to Re^4: Benchmark, -s versus schwartzian (vs hash)
in thread Benchmark, -s versus schwartzian

The node you've mentioned actually uses an even faster form of the Schwartzian transform I've completely forgot about.

Thus, I've added it to my benchmark too:

sub sort_arr { my @h = map -s, @all; @results = @all[sort {$h[$a]<=>$h[$b]} 0..@h-1]; }

The results are amazing: this form is about 1.5 times as efficent than any of the other ones.

Replies are listed 'Best First'.
Re^6: Benchmark, -s versus schwartzian (vs hash)
by Aristotle (Chancellor) on Aug 23, 2004 at 15:58 UTC

    Yes, because it uses an array, and only one array.

    What's even more important to me is that it's also decidely easier on memory. Every single array in Perl has a minimum overhead of about 100 bytes without even counting the individual scalars inside it (and the one holding the reference to it..). When you're trying to sort a couple dozen million elements with a Schwartzian transform, as I've had to, that adds up alarmingly. In comparison, this method is basically free in terms of memory cost.

    Nitpick: you should really say 0 .. $#h when that's what you mean, as is the case here.

    Makeshifts last the longest.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://385064]
and a log crumbles through the grate...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (8)
As of 2018-07-23 15:39 GMT
Find Nodes?
    Voting Booth?
    It has been suggested to rename Perl 6 in order to boost its marketing potential. Which name would you prefer?

    Results (469 votes). Check out past polls.