OT: How to do a reverse word list in Perl

Hi!

Mark Reed writes:
>...
> In place of the
>
> sort { reverse($a) cmp reverse($b) } <STDIN>
>...
In a Unix shell, this is simply:

   rev | sort | rev

**Henrik

PS: I've marked this OT.  Please also do so.

Reply