@argA = sort {
    no warnings;
    $a <=> $b
       or
    lc($a) cmp lc($b)
} @argA;