#! /usr/bin/perl
-require bugcfg;
-require scanlib;
+use warnings;
use strict;
-# use warnings;
+
+use File::Basename;
+use lib dirname(__FILE__);
+use bugcfg;
+use scanlib;
# Main part
}
print "package\n";
print $p, "\n";
- print $section, "\n";
+ print $section, "\n" if defined $section;
print $scanlib::maintainer{$package}, "\n";
print "\n";
}