Perl 6 Perl 6 today #29

Case-insensitive sort

> my @a = <Fruit CHERRY danish Apple berry BaNaNa apricot>;
> .say for @a.sort( { .lc } );
Apple
apricot
BaNaNa
berry
CHERRY
danish
Fruit
Copyright © 2009
http://www.pmichaud.com/2009/pres/