my @sorted =
  map join(".", map ord, split //),
  sort
  map join("", map chr, split /\./),
  @data;