#
sub checkdiskspace () {
# Call diskfree to gather the free disk space of /var.
- my @df = `/bin/df -B M /var`;
+ my @df = &General::system_output("/bin/df", "-B", "M", "/var");
# Loop through the output.
foreach my $line (@df) {
# Call the suricatactrl binary and pass the "cron" command
# with the requrested interval.
- system("$suricatactrl $option $interval &>/dev/null");
+ &General::system("$suricatactrl", "$option", "$interval");
# Return "1" - True.
return 1;
} else {
# Call the suricatactrl binary and pass the requrested
# option to it.
- system("$suricatactrl $option &>/dev/null");
+ &General::system("$suricatactrl", "$option");
# Return "1" - True.
return 1;