http://www.perlmonks.org?node_id=377062


in reply to To use a module...or not.

I'd use Perl 6.
my @results = sort { complex_operation($^a) } @list;
If you pass Perl 6's sort a block that takes a single argument, it will use it as a key for sorting the data, as a ST would.