.bp 
.au "TSC \- intro.xx"

.c
The sortbylen Program

.2
\f(BIsortbylen\fB is just an example of how much easier it can 
be to use Perl's sort than the standard utility.  However, 
this is not always the case.

.2
The following Perl statement dumps out each line with the longest
one at the top.

.b
print sort { 
    length($b) <=> length($a) 
} <>;
.e

.2
.T $a
and 
.T $b
are swapped for a reverse sort.