Select Code to Download

my @sorted = sort { split_sort( fc($a), fc($b), 'type', 'split expr') 
+} @array;
# I made changes to split_sort detailed in a moment.

sub split_sort {
  my ($in_a, $in_b, $sort_type, $split) = @_;
...
    }
  }
}

=pod

...
Lady Aleena

=cut