if ($pLogs) {
print "Purging records from action_logs.\n" if $verbose;
for (0..10000){
for ( 0 .. 10000 ) {
$dbh->do(q{ INSERT INTO action_logs (user,timestamp) VALUES (52,"2022-01-01 09:00:00") });
$dbh->do(q{ UPDATE action_logs SET timestamp = "2020-01-01 10:00:00" ORDER BY action_id DESC LIMIT 1 });
}
-