@sorted_data = sort { lc $a cmp lc $b } @data