Like, I *love* Date::Manip, that's just me I lllllike it. But if you don't have holidays inputted correctly (especially if you aren't in the U.S.) or hey they added another holiday, well you only have 9 files.

So why not just keep 13 or 14 files? Is each one so huge that you are going to wreck your partition? Laziness is a virtue in Perl and saves you time too. I'm going to stick to that and not post any code! :)

Also, I would say don't worry so much about dates. You have a process that is generating a file a day, *if* it's running. Count how many files you have in the directory once a day and unlink the last one. You might even be able to parse the file names to be sure, because what if someone touches one, or you do a recovery from backup. If these are important files look at what is the easiest way to ensure your integrity.

The easiest way I can think of doing that if you are in control of file naming is to name files in sequential order, sort the file names, and determine the next file number. Perhaps you could even use time(). Otherwise if you are really sure you want to get rid of the oldest file, -M or stat will do the age checking part (in unix anyway, don't quote me for Windows).