Uri Guttman wrote:
>
> print sort{lc$a cmp lc$b}
> map{/(.*)\|(.*)\|(.*)/;($2?"$2${$3&&\qq{, $3}}":$1).$/}<>
>
This changes "pete||Peter" to "pete" when it should be "Peter" according
to the example given...
--
Rick Klement
==== Want to unsubscribe from Fun With Perl? Well, if you insist...
==== Send email to <fwp-request@technofile.org> with message _body_
==== unsubscribe