หากคุณสามารถบันทึกไฟล์บันทึกเวลาระหว่างการทำงานคุณสามารถตรวจสอบวันที่ของไฟล์แทนการใช้ไฟล์วันที่ปัจจุบันเท่านั้น
หากคุณพบว่าคำสั่งสนับสนุนค่าเศษส่วนสำหรับ-mtime
(หรือมี-mmin
) ( GNU พบได้ทั้ง , POSIX ดูเหมือนจะไม่จำเป็นต้องใช้อย่างใดอย่างหนึ่ง ) คุณสามารถ 'เค้น' งาน cron กับที่มีการค้นพบและสัมผัส
หรือหากคุณมีสถิติคำสั่งที่สนับสนุนการแสดงวันที่ไฟล์เป็น“วินาทีตั้งแต่ยุค” (เช่นสถิติจาก coreutils Gnuยังใช้งานอื่น ๆ ) คุณสามารถทำให้การเปรียบเทียบของคุณเองโดยใช้วัน , สถิติและดำเนินการเปรียบเทียบของเปลือก (พร้อม ด้วยการแตะเพื่ออัปเดตไฟล์เวลาประทับ) คุณอาจสามารถใช้lsแทนstat ได้ถ้ามันสามารถทำการฟอร์แมต (เช่นls จาก GNU fileutils )
ด้านล่างเป็นโปรแกรม Perl (ฉันเรียกมันว่าn-hours-ago
) ซึ่งอัปเดตไฟล์การประทับเวลาและออกสำเร็จหากการประทับเวลาดั้งเดิมนั้นเก่าพอ ข้อความการใช้งานแสดงวิธีใช้ในรายการ crontab เพื่อเร่งงาน cron นอกจากนี้ยังอธิบายการปรับสำหรับ "การประหยัดเวลากลางวัน" และวิธีจัดการกับการประทับเวลา 'ล่าช้า' จากการวิ่งครั้งก่อน
#!/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;