Heh -- non Perl advice follows :)

If you're using linux (or most any *nix -- I think this flag is the same for most versions of ls) you should just use the -t flag and let ls do the time sorting for you. Or use -T for most recent first.

Similarly, there are flags for dir that allow it to do the sorting, too. See dir /? for clues.