# untested
if ( -f $file) {
   $age{$File::Find::dir}{ -M $file < 180 ? 'old' : 'new' }++;
}