28
28
die "sql_command directive is not set in admin.conf\n" if ($sqlcmd eq '');
29
29
die "Could not find sql binary. Please make sure that the \$sqlcmd variable points to the right location\n" if (! -x $sqlcmd);
33
33
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime;
34
34
$date_start = POSIX::strftime("%Y-%m-%d %T",0,0,0,($mday - 1),$mon,$year,$wday,$yday,$isdst);