Select Code to Download

my @cityKeys;
my @distanceKeys;
...
    @distanceKeys = sort @distanceKeys;  #Sort the array
  }
}

my @cityKeys     = sort grep { /city/     } @cgiParamKeys;
my @distanceKeys = sort grep { /distance/ } @cgiParamKeys;

foreach (@cityKeys, @distanceKeys)

if (/city/ || /distance/)

foreach  (@cityKeys, @distanceKeys) {
  print $cgi->hidden($_ => $cgiParam{$_});
}