#!	/usr/bin/perl
# Set the date of the file to be "the epoch", so that the files will appear
# to be older than any file the user may have installed on the system. This
# will keep my files from replacing any existing user files.
#
while ( $arg=shift(@ARGV) ) {
	utime 0, 0, $arg;
}
