10 scanlib::readpackages($bugcfg::debian_ftproot, "debian") if defined $bugcfg::debian_ftproot;
11 scanlib::readsources($bugcfg::debian_ftproot, "debian") if defined $bugcfg::debian_ftproot;
13 scanlib::readdebbugssources($bugcfg::debian_sources, "debian") if defined $bugcfg::debian_sources;
16 scanlib::readpseudopackages();
17 scanlib::readmaintainers();
20 binmode(STDOUT,':encoding(UTF-8)');
22 for my $p (keys %scanlib::packagelist) {
26 if (exists $scanlib::section{$package}) {
27 $section = $scanlib::section{$package};
29 $section = $scanlib::debbugssection{$package};
34 print $scanlib::maintainer{$package}, "\n";
38 for my $b (keys %scanlib::bugs) {
40 for my $key (keys %{$scanlib::bugs{$b}}) {
41 print $key, "=", $scanlib::bugs{$b}->{$key}, "\n";