diff --git a/en/cgi/query-pr.cgi b/en/cgi/query-pr.cgi
index 6a0d94b34c..de5deab4da 100755
--- a/en/cgi/query-pr.cgi
+++ b/en/cgi/query-pr.cgi
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -T
-# $FreeBSD$
+# $FreeBSD: www/en/cgi/query-pr.cgi,v 1.27 2001/11/07 16:32:13 sobomax Exp $
 
 $ENV{'PATH'} = "/bin:/usr/bin:/usr/sbin:/sbin:/usr/local/bin";
 
@@ -179,6 +179,9 @@ print qq`<A HREF="mailto:freebsd-gnats-submit\@FreeBSD.org,${email}?subject=Re:%
 
 print &html_footer;
 
+# Sleep 0.35 seconds to avoid DoS attacks from broken robots
+select undef, undef, undef, 0.35;
+
 exit 0;
 
 sub getline