3 # Simple script to run all crons (for tests)
5 # Author: aljeux <aljeux@free.fr>
12 open(F, $file) || die "Unable to open file '$file': $!";
16 if (/^([A-Z]+)="(.*)"/) {
18 print "Loading $1=$2\n";
20 if (/\S+\s+\S+\s+\S+\s+\S+\s+\S+\s+root\s+(.*)/) {
21 print "Running $1 (as root)\n";
24 if (/\S+\s+\S+\s+\S+\s+\S+\s+\S+\s+gforge\s+(.*)/) {
25 print "Running $1 (as gforge)\n";
26 system('su', 'gforge', '-c', $1);