Take a look at the FMTEYEWTK article on sort (Far More Than Everything You Every Wanted To Know) where two leading perl coders give answers to a very similiar question.

-Blake