… | … | ||
---|---|---|---|
131 | $req =~ /^(?:\015\012)? | 131 | $req =~ /^(?:\015\012)? |
132 | (GET|HEAD) \040+ | 132 | (GET|HEAD) \040+ |
133 | ([^\040]+) \040+ | 133 | ([^\040]+) \040+ |
134 | HTTP\/([0-9]+\.[0-9]+) | 134 | HTTP\/([0-9]+\.[0-9]+) |
135 | \015\012/gx | 135 | \015\012/gx |
136 | or $self->err(403, "method not allowed", { Allow => "GET,HEAD" }); | 136 | or $self->err(405, "method not allowed", { Allow => "GET,HEAD" }); |
137 | 137 | ||
138 | $2 < 2 | 138 | $2 < 2 |
139 | or $self->err(506, "http protocol version not supported"); | 139 | or $self->err(506, "http protocol version not supported"); |
140 | 140 | ||
141 | $self->{method} = $1; | 141 | $self->{method} = $1; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |