> -----Original Message-----
(B> From: [EMAIL PROTECTED]
(B> [mailto:[EMAIL PROTECTED] On
(B> Behalf Of Michael Meltzer
(B> Sent: Wednesday, December 15, 2004 2:44 PM
(B> To: Perl-Win32-Users
(B> Subject: sort question
(B>
(B> The following strings I have in an array:
(B>
(B> xyz
(B> abcd
(B> ZABC
(B>
(B> if I do @sorted = sort(@unsorted) I get
(B
(B>From perldoc -f sort:
(B
(B# now case$B!>(Jinsensitively
(B@articles = sort {uc($a) cmp uc($b)} @files;
(B
(B> ZABC
(B> abcd
(B> xyz
(B>
(B> I would like to sort this strings alphabetical ignoring
(B> capitalisation but whithout changing the output format.
(B> I want to get this:
(B>
(B> abcd
(B> xyz
(B> ZABC
(B>
(B> How can I do this ?
(B>
(B> Michael
(B>
(B> --
(B> +-- Michael Meltzer
(B> -------------+-----------------------------------------+
(B> | AED-SICAD Aktiengesellschaft | EMail :
(B> [EMAIL PROTECTED] |
(B> | Lilienthal-Str. 7 | Phone : +49-89-45026-108
(B> |
(B> | 85579 Neubiberg | Fax : +49-89-45026-113
(B> |
(B> +--------------------------------+----------------------------
(B> -------------+
(B>
(B>
(B>
(B> _______________________________________________
(B> Perl-Win32-Users mailing list
(B> [EMAIL PROTECTED]
(B> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
(B>
(B_______________________________________________
(BPerl-Win32-Users mailing list
([EMAIL PROTECTED]
(BTo unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
