[ic] Safe trap info

Mike Heins mikeh@minivend.com
Tue, 28 Nov 2000 08:54:47 -0500

Quoting Steve & Patti Getzinger (steveandpatti@wubs.org):
> jojo@buchonline.net wrote:
> I have not looked at the user tag but the files I am checking are .rm files
> residing in the Content area of the realserver. Guessing (just guessing) by
> the name that applies to the db files for IC. I will look into it though as
> it may be just what the doctor ordered. I appreciate all the feed about Safe
> from everyone.

There are some UI tags which help here. For instance, if you set
SafeUntrap to "rand ftmtime" in interchange.cfg, you can do:

[set allowed_days]7[/set]

[loop list="[list-glob content/*.rm]"]
[loop-sub testfile]
	my $fn = shift;
	return "Not existant?" unless -f $fn;
	return "OK" if -M $fn <= $Scratch->{allowed_days};
	return "File $fn is older than $Scratch->{allowed_days} days.\n";
[loop-code]: [loop-exec testfile][loop-code][/loop-exec]<BR>

Akopia, Inc., 131 Willow Lane, Floor 2, Oxford, OH  45056
phone +1.513.523.7621 fax 7501 <heins@akopia.com>

For a successful technology, reality must take precedence over public
relations, for Nature cannot be fooled. -- Dick Feynman