in reply to how to do effective sort in perl

perl -e '@filenames = sort <*>'

In Section Seekers of Perl Wisdom