+ @_ = qw( configure configure.in config.h.in configure.in
+ rsync.1 rsync.yo rsyncd.conf.5 rsyncd.conf.yo );
+ while (@_) {
+ my $gen = 'cvsdir/' . shift(@_);
+ my $src = 'cvsdir/' . shift(@_);
+ if ((-M $gen) > (-M $src)) {
+ system "touch $gen";
+ }
+ }