I have hacked something together in perl for my own purposes. Will post it this evening. Don't know if it's that user friendly though. Also the usual disclaimers like for all other cruft scripts apply here too, e. g. don't delete a file you are not 100% it is cruft.
-- Regards, Daniel
