aboutsummaryrefslogtreecommitdiffstats
path: root/mkadvisories
blob: 7e3ec4132109c9fa4b256dec8857821ea9bf256d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
#!/usr/bin/perl -w

use strict;
use MGA::Advisories;

my %advdb;
$advdb{advisories} = MGA::Advisories::get_advisories();
MGA::Advisories::publish_advisories(\%advdb);
MGA::Advisories::sort_advisories(\%advdb);
MGA::Advisories::output_pages(\%advdb);
MGA::Advisories::dumpdb(\%advdb);
MGA::Advisories::send_adv_mail(\%advdb);
MGA::Advisories::send_report_mail(\%advdb);