Help for this page
use strict; use warnings; ... my @sorted = sort { lc $a cmp lc $b } sort { $b cmp $a } @list; say for @sorted;
$ perl sort_lc.pl P007_yum ... P007b_yum P007b_Yum P007B_YUM