Parent Directory | Revision Log | Patch
revision 327 by dpavlin, Fri Aug 28 19:41:16 2009 UTC | revision 328 by dpavlin, Fri Aug 28 19:44:38 2009 UTC | |
---|---|---|
# | Line 371 sub start { | Line 371 sub start { |
371 | ||
372 | if ($request =~ m{^GET (/.*) HTTP/1.[01]}) { | if ($request =~ m{^GET (/.*) HTTP/1.[01]}) { |
373 | my $path = $1; | my $path = $1; |
374 | $path =~ s/%([0-9A-Fa-f]{2})/chr(hex($1))/ge; | |
375 | my $param; | my $param; |
376 | if ( $path =~ s{\?(.+)}{} ) { | if ( $path =~ s{\?(.+)}{} ) { |
377 | foreach my $p ( split(/[&;]/, $1) ) { | foreach my $p ( split(/[&;]/, $1) ) { |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |