Select Code to Download

  @$_ = sort {$a cmp $b} @$_ for \@list1, \@list2;

  map {@$_ = sort {$a cmp $b} @$_} \@list1, \@list2;