如何使用perl修改crontab? [关闭]

2024-01-04

如何通过 perl 脚本在 crontab 中附加 cron 任务?
我想到了以下几点:

#!/usr/bin/perl  

use strict;  
use warnings;  

`crontab<<EOL  
00 * * * * /home/slynux/download.sh    
EOL`  

我不想把事情搞砸,那么我走在正确的道路上吗?
另外,如果我附加它,我将如何删除它?我是 Perl 新手


快速而肮脏的方式:

#!/usr/bin/perl  

use strict; use warnings;  

`(crontab -l; echo "00 * * * * /home/slynux/download.sh") | crontab -`;

另一种(更好的)方法:

#!/usr/bin/perl  

use strict; use warnings;  

open my $fh, "| crontab -" || die "can't open crontab: $!";
my $cron = qx(crontab -l);
print $fh "$cron\n0 * * * * /home/slynux/download.sh\n";
close $fh;

要删除crontab行与/home/slynux/download.sh :

#!/usr/bin/perl  

use strict; use warnings;

open my $fh, "| crontab -" || die "can't open crontab: $!";
my $cron = qx(crontab -l);
$cron =~ s!.*/home/slynux/download\.sh.*!!g;
print $fh $cron;
close $fh;
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

如何使用perl修改crontab? [关闭] 的相关文章

随机推荐