topic Re: file cleanup in Operating System - HP-UX

file cleanup

Ridzuan Zakaria — Tue, 04 Dec 2001 19:43:38 GMT

Hello,

How do I remove/delete files older than 1 hour or last modified was 1 hour ago?

Thanks in advance

Re: file cleanup

James R. Ferguson — Tue, 04 Dec 2001 19:55:32 GMT

Hi:

You can do this with 'find'. 'touch' a reference file and then search for files that are older than it:

cd
# touch -m -t 12041300 myref
# find . -type f ! -newer /tmp/ref -exec rm -i {} \;

Regards!

...JRF...

Re: file cleanup

A. Clay Stephenson — Tue, 04 Dec 2001 19:58:30 GMT

Hi:

I have a Perl utility fileage.pl which can tell if a file has been accessed, modified, or changed in a period of time.

Here is one approach:

cd to desired directory:
find . -type f -print | while read X
do
fileage.pl -m 3600 ${X}
STAT1=$?
fileage.pl -c 3600 ${X}
STAT2=$?
if [ ${STAT1} -eq 0 -a ${STAT2} -eq 0 ]
then
echo "File ${X} Has not been modified in \c"
echo "3600 seconds"
# rm -f ${X}"
fi
done

Fileage.pl returns 0 if the file has not been modified and 1 if it has. Simply invoke fileage.pl without arguments for full usage. Note: The rm is commented out. Test first.

Regards, Clay

Re: file cleanup

G. Vrijhoeven — Tue, 04 Dec 2001 19:59:00 GMT

Hi,

linux has the find . -cmin n optio, hp does not, create a referention file every hour and,

find . -newer file -exec rm {}\;

Hope this will help,

Gideon

Re: file cleanup

A. Clay Stephenson — Tue, 04 Dec 2001 20:04:46 GMT

Ooops, the remove line should not have a trailing "

should be:
rm -f ${X}

Re: file cleanup

Ridzuan Zakaria — Tue, 04 Dec 2001 20:05:08 GMT

Thanks guys.

Re: file cleanup

Kofi ARTHIABAH — Tue, 04 Dec 2001 20:10:22 GMT

You could try the following:

BASEFILE=/tmp/dummyfile
HERE=/path/to/directory/to/start/from
now=`date +%m%d%H%M`
hourago=`expr $dt - 100`
touch -t $hourago $BASEFILE
cd $HERE
find . -type f ! -newer $BASEFILE -exec rm {} \;

(note that you can replace rm with ls to list the files rather than delete them)

good luck.

Re: file cleanup

Kofi ARTHIABAH — Tue, 04 Dec 2001 20:12:22 GMT

Oooooppsss... in my last post, it should be now rather than dt:

hourago=`expr $now - 100`