急救！关于Shell脚本删除过期文件的有关问题，Shell脚本达人乱入

急救！关于Shell脚本删除过期文件的问题，Shell脚本达人乱入
需求是这样的：删除指定目录下过期的文件，以系统当前时间和文件的最后修改时间作比较，如果超过指定的保存时间，则删除它，小弟不怎么会写Sheel脚本，麻烦达人帮助，多谢！

------解决方案--------------------------------------------------------
perl -MFile::Path -e 'unlik grep{(time-(stat $_)[9])>60*60*24*1}glob"*"' 

 





------解决方案--------------------------------------------------------

Assembly code

#删除7天之前的文件find . -type f -mtime +7 -exec rm -f {} \;