this is easily doable in perl. you can start by looking at the File::Find and Date::Calc modules. there's plenty of info here at the monastary on their application to specific problems. start your quest by using Super Search.
if you're unfamiliar with using modules, there's plenty of info here on that as well. and if you run into problems with your code, post it and we'll gladly have a look.