<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">#!/usr/bin/perl
# Wrapper to run a single function via webmin cron

$main::no_acl_check = 1;
$main::no_referers_check = 1;
$main::webmin_script_type = 'cron';
do './webmincron-lib.pl';
$cron = $ARGV[0];

# Build list of args
my @args;
for(my $i=0; defined($cron-&gt;{'arg'.$i}); $i++) {
	push(@args, $cron-&gt;{'arg'.$i});
	}

# Force webmin script type to be cron
$main::webmin_script_type = 'cron';

# Require the module, call the function
eval {
	local $main::error_must_die = 1;
	&amp;foreign_require($cron-&gt;{'module'}, $cron-&gt;{'file'});
	&amp;foreign_call($cron-&gt;{'module'}, $cron-&gt;{'func'}, @args);
	};
$log = { %$cron };
if ($@) {
	$log-&gt;{'error'} = $@;
	}

# Log it, if enabled
if ($gconfig{'logsched'}) {
	&amp;webmin_log("run", "webmincron", $cron-&gt;{'id'}, $log);
	}
</pre></body></html>