in reply to Deleting by Age!

I think Zaxo's way is the shortest to-date in this thread if you want a Perl-only solution. But, since you are on Windows...
perl -e "@file = (split/\n/,`dir /od /b /S`)[0..5]; print @file;"
Which returns the top six oldest files in the current or any of its subdirectories.

Celebrate Intellectual Diversity