or equal to 1.

                      or equal to 1.

   --log-modules      Specify which action log modules to trim. Repeatable.

   --log-modules      Specify which action log modules to trim. Repeatable.

   --preserve-log     Specify which action logs to exclude. Repeatable.

   --preserve-log     Specify which action logs to exclude. Repeatable.

   --logs DAYS        purge entries from action_logs older than DAYS days.

   --logs DAYS        purge entries from action_logs older than DAYS days.

                      Defaults to 180 days if no days specified.

                      Defaults to 180 days if no days specified.

   --searchhistory DAYS  purge entries from search_history older than DAYS days.

   --searchhistory DAYS  purge entries from search_history older than DAYS days.

my $cards;

my $cards;

my @log_modules;

my @log_modules;

my @preserve_logs;

my @preserve_logs;

my $jobs_days;

my $jobs_days;

my @jobs_types;

my @jobs_types;

    'logs:i'            => \$pLogs,

    'logs:i'            => \$pLogs,

    'log-module:s'      => \@log_modules,

    'log-module:s'      => \@log_modules,

    'preserve-log:s'    => \@preserve_logs,

    'preserve-log:s'    => \@preserve_logs,

    'messages:i'        => \$pMessages,

    'messages:i'        => \$pMessages,

    'fees:i'            => \$fees_days,

    'fees:i'            => \$fees_days,

    'searchhistory:i'   => \$pSearchhistory,

    'searchhistory:i'   => \$pSearchhistory,

        $log_query .= " AND module IN (" . join(',',('?') x @log_modules ) . ")";

        $log_query .= " AND module IN (" . join(',',('?') x @log_modules ) . ")";

        push @query_params, @log_modules;

        push @query_params, @log_modules;

    }

    }

    $sth = $dbh->prepare( $log_query );

    $sth = $dbh->prepare( $log_query );

    if ( $confirm ) {

    if ( $confirm ) {

        $sth->execute($pLogs, @query_params) or die $dbh->errstr;

        $sth->execute($pLogs, @query_params) or die $dbh->errstr;