
There's more than one way to do things
	PerlMonks

Re^2: Choosing the right sort (Or: WUDsamatter?)

by salva (Monsignor)

on Apr 19, 2005 at 09:28 UTC ( #449158=note: print w/ replies, xml )

Need Help??

Help for this page

Select Code to Download

Select or download this

use Sort::Key;
sub mykeysort {
    ikeysort { /foo(\d+)\.tla/; $1 } @_
}

Select or download this

              Rate       naive schwartzian     guttros   Sort::Key
naive       17.9/s          --        -73%        -79%        -83%
...
guttros     84.0/s        371%         25%          --        -19%
Sort::Key    104/s        483%         55%         24%          --

Select or download this

               Rate       naive schwartzian     guttros   Sort::Key
naive       0.413/s          --        -77%        -86%        -89%
schwartzian  1.79/s        334%          --        -38%        -52%
guttros      2.88/s        597%         61%          --        -23%
Sort::Key    3.74/s        805%        109%         30%          --

Select or download this

            s/iter       naive schwartzian     guttros   Sort::Key
naive         30.2          --        -78%        -87%        -90%
schwartzian   6.53        363%          --        -42%        -56%
guttros       3.81        693%         72%          --        -24%
Sort::Key     2.90        942%        125%         31%          --

Select or download this

          s/iter   guttros Sort::Key
guttros     39.6        --      -25%
Sort::Key   29.7       33%        --

Node Status^?

node history
Node Type: note [id://449158]
help

Chatterbox^?

How do I use this? | Other CB clients

Other Users^?

Others lurking in the Monastery: (10)

As of 2013-06-19 09:37 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

How many continents have you visited?

Results (653 votes), past polls