If you create a sorting function, and give it a prototype of ($$), it takes its two arguments and puts them in the @_ array:

package other;
sub backwards ($$) { $_[1] cmp $_[0] }  # from perlfunc
[download]

_____________________________________________________
Jeff japhy Pinyan: Perl, regex, and perl hacker.
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;