NAME: thm_file_cleanup PURPOSE: returns a list of old files that may be deleted, optionally deletes files CALLING SEQUENCE: files= thm_file_cleanup(filespec,print=print, $ sort_atime=sort_atime,sort_mtime=sort_mtime,$ sort_size=sort_size,reverse=reverse, $ delete_files=delete_files, days_to_keep=days_to_keep) INPUT: filespec = what kind of file is to be deleted, the default is '*.cdf' OUTPUT: files = the list of files to be deleted KEYWORDS: print = print the list of files sort_atime = sort files by Atime - last access time sort_mtime = sort files by mtime - last modified time sort_size = sort by size days_to_keep = the number of days old, beyone which we delete the files, the default is to delete files that have not been accessed in the last 30 days Delete_files = if set, delete the files, This must be set for the files to be deleted. Original Author: Davin Larson $LastChangedBy: aaflores $ $LastChangedDate: 2012-01-06 12:37:07 -0800 (Fri, 06 Jan 2012) $ $LastChangedRevision: 9507 $ $URL: svn+ssh://thmsvn@ambrosia.ssl.berkeley.edu/repos/spdsoft/trunk/projects/themis/common/thm_file_cleanup.pro $