$BODY->param(IntelLIsts => \@intellists);
}
my $query = $DBH->prepare(q{SELECT i.id, u.username, i.message, report_date FROM intel_messages i
$BODY->param(IntelLIsts => \@intellists);
}
my $query = $DBH->prepare(q{SELECT i.id, u.username, i.message, report_date FROM intel_messages i