Well, that's just no longer the case. In perl5.6, the four common sort routines:
{ $a cmp $b } { $a <=> $b } { $b cmp $a } { $b <=> $a }
are all optimized. This was change 2595 in perl5.005_55 on Jan 13, 1999. (See the Changes file (big!) or the patch.)