Exit straight away if the HTTP method is HEAD. (master was doing lots of
pointless work because somebody was issuing HTTP HEADs on every link on the
index of bugs by submitter ...)
use vars(qw($gEmailDomain $gHTMLTail $gSpoolDir));
+if ($ENV{REQUEST_METHOD} eq 'HEAD') {
+ print "Content-Type: text/html\n\n";
+ exit 0;
+}
+
my %param = readparse();
my $tail_html;
use vars qw($gPackagePages $gWebDomain);
+if ($ENV{REQUEST_METHOD} eq 'HEAD') {
+ print "Content-Type: text/html\n\n";
+ exit 0;
+}
+
nice(5);
my %param = readparse();