X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=examples%2Fdebian%2Fmisc%2Fbugspam.cgi;fp=examples%2Fdebian%2Fmisc%2Fbugspam.cgi;h=7830aeeeee7ea95c9c7ac21b6cdbb8635a02027d;hb=0b8b4ec86fe116cf47cd84ab3b0b37912ada73dd;hp=46bc17f68e0a5e969162c123bb797dc28270b51a;hpb=bc8c4b8d9a2099740a61c87e2ee2abce9fbfd921;p=debbugs.git diff --git a/examples/debian/misc/bugspam.cgi b/examples/debian/misc/bugspam.cgi index 46bc17f..7830aee 100755 --- a/examples/debian/misc/bugspam.cgi +++ b/examples/debian/misc/bugspam.cgi @@ -16,7 +16,7 @@ sub quitcgi($;$) { } my $bug = param('bug') or quitcgi('No bug specfied', '400 Bad Request'); -quitcgi('No valid bug number', '400 Bad Request') unless $bug =~ /^\d{3,6}$/; +quitcgi('No valid bug number', '400 Bad Request') unless $bug =~ /^\d{3,7}$/; my $remote_host = remote_host or quitcgi("No remote host"); my $ok = param('ok'); if (not defined $ok) {