Jika Anda dapat menyimpan file timestamp di antara proses, Anda dapat memeriksa tanggalnya alih-alih hanya mengandalkan tanggal saat ini.
Jika perintah find Anda mendukung nilai fraksional untuk -mtime
(atau memiliki -mmin
) ( find GNU memiliki keduanya , POSIX tampaknya tidak membutuhkan keduanya ), Anda dapat 'membatasi' tugas cron dengan find dan touch .
Atau, jika Anda memiliki perintah stat yang mendukung menampilkan tanggal file sebagai "detik sejak zaman" (mis. Stat dari Gnu coreutils , juga implementasi lainnya), Anda bisa membuat perbandingan sendiri menggunakan tanggal , stat , dan operator perbandingan shell (bersama dengan sentuhan untuk memperbarui file cap waktu). Anda juga mungkin dapat menggunakan ls alih-alih stat jika dapat melakukan format (mis. Ls dari GNU fileutils ).
Di bawah ini adalah program Perl (saya menyebutnya n-hours-ago
) yang memperbarui file timestamp dan keluar dengan sukses jika cap waktu asli sudah cukup tua. Teks penggunaannya menunjukkan cara menggunakannya dalam entri crontab untuk mempercepat pekerjaan cron. Ini juga menjelaskan penyesuaian untuk "penghematan siang hari" dan bagaimana menangani cap waktu 'terlambat' dari proses sebelumnya.
#!/usr/bin/perl
use warnings;
use strict;
sub usage {
printf STDERR <<EOU, $0;
usage: %s <hours> <file>
If entry at pathname <file> was modified at least <hours> hours
ago, update its modification time and exit with an exit code of
0. Otherwise exit with a non-zero exit code.
This command can be used to throttle crontab entries to periods
that are not directly supported by cron.
34 2 * * * /path/to/n-hours-ago 502.9 /path/to/timestamp && command
If the period between checks is more than one "day", you might
want to decrease your <hours> by 1 to account for short "days"
due "daylight savings". As long as you only attempt to run it at
most once an hour the adjustment will not affect your schedule.
If there is a chance that the last successful run might have
been launched later "than usual" (maybe due to high system
load), you might want to decrease your <hours> a bit more.
Subtract 0.1 to account for up to 6m delay. Subtract 0.02 to
account for up to 1m12s delay. If you want "every other day" you
might use <hours> of 47.9 or 47.98 instead of 48.
You will want to combine the two reductions to accomodate the
situation where the previous successful run was delayed a bit,
it occured before a "jump forward" event, and the current date
is after the "jump forward" event.
EOU
}
if (@ARGV != 2) { usage; die "incorrect number of arguments" }
my $hours = shift;
my $file = shift;
if (-e $file) {
exit 1 if ((-M $file) * 24 < $hours);
} else {
open my $fh, '>', $file or die "unable to create $file";
close $fh;
}
utime undef, undef, $file or die "unable to update timestamp of $file";
exit 0;