push(@files, "${File::Find::dir}/$_") if(!-l $_  and  (-M $_) > 30);