sub my_split {
  split "", shift;
}

print join "", sort my_split("qwerty");