Shell Programming and Scripting

I have a requirement to remove all files from a directory execpt those >
(now -N hrs).

Once I can figure out how to calculate (now -N hrs) I was thinking of creating a temporary file with that time (now-N hrs) than using the find and -newer option.

Does anybody have any KSH code (needs to run on AIX, HPUX and Solaris), which can do this date math. If would be nice if it can return the
format back in the way the touch command expects, if not I guess I can
change the code to the format I need.

Thanks in advance to all who answer.

VBE,

Great links, thanks.

I found what I needed but its with perl. Can somebody show me how I can
call this within a KSH script.

I want to do something like this calc_time=$(perl code .....)

Thanks

Code:

 
#!/usr/bin/perl -w
use strict;
use POSIX;
print strftime "%Y-%m-%d %H:%M:%S\n", localtime((time() - 7200));

Code:

result=$(
/usr/bin/perl -w -e '
use strict;
use POSIX;
print strftime "%Y-%m-%d %H:%M:%S\n", localtime((time() - 7200)); ' 
)

echo "$result"

perl -e '[command goes here]' is for an inline command.

Except the strftime command produces a time string will not work with touch. touch puts an mtime timestamp on a file.
Should be (not checked):

Code:

"%Y%m%d%H%M%S"

which is YYYYmmddhhmiss

Check your manpage; some older versions of touch require touch -t YYYYmmddhhmi.ss [filename] <- note the extra dot