X-Git-Url: https://git.p6c8.net/selfforum.git/blobdiff_plain/37166eaf544814bc3a164b0574fb16d0cb369ad6..51fc77aafe3ce278f9ab2dbf1a4d48214a291798:/selfforum-cgi/shared/CheckRFC.pm?ds=inline diff --git a/selfforum-cgi/shared/CheckRFC.pm b/selfforum-cgi/shared/CheckRFC.pm index 6c64ade..35d47d8 100644 --- a/selfforum-cgi/shared/CheckRFC.pm +++ b/selfforum-cgi/shared/CheckRFC.pm @@ -172,7 +172,7 @@ BEGIN { my $hsegment = "(?:(?:$httpuchar|[;:\@&=~])*)"; my $search = "(?:(?:$httpuchar|[;:\@&=~])*)"; my $hpath = "(?:$hsegment(?:/$hsegment)*)"; - my $httpurl = "(?:http://$hostport(?:/$hpath(?:\\?$search)?)?)"; + my $httpurl = "(?:http://$hostport(?:/$hpath(?:\\?$search)?)?(?:#$xchar*)?)"; # GOPHER (see also RFC1436) my $gopher_plus = "(?:$xchar*)";