Perl doesn't have any mechanism to "add a order by to a search" so you must be using some module, perhaps you could enlighten us with more detail in this regard.

/J\