my @unsorted = qw/Maggie Bart Lisa Homer Marge/;
my @sorted = sort @unsorted;

##</code><code>##

my @sorted = sort { lc($a) cmp lc($b) } @unsorted;