map {
  unpack or substr
}sort map{
  pack [template, $var1, $var2, etc, $string_or_reference]
}