in reply to Sorting names

What about:
print join("\n",sort(@names))."\n";

In Section Seekers of Perl Wisdom