note
elusion
I'd use Perl 6.
<code>
my @results = sort { complex_operation($^a) } @list;
</code>
If you pass Perl 6's <code>sort</code> a block that takes a single argument, it will use it as a key for sorting the data, as a ST would.<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-21569">
<p><b><A HREF="/index.pl?node=elusion&lastnode_id=1072">elusion</a></b> <b>:</b> <b><A HREF="http://matt.diephouse.com">http://matt.diephouse.com</a></b>
</div></div>
377058
377058