Programming C# C++ (7) Delphi (604) Java (8) JavaScript (55) perl (40) mysql (3) perl CGI (3) php (12) VBScript (1) Visual Basic (1)
Exchange Links About this site Links to us
|
Code snippets: parsing GET or POST data
This article has not been rated yet. After reading, feel free to leave comments and rate it.
The following routine is my standard snippet to parse transmitted data (either GET or POST, not both).
 | |  | | sub parse_form {
if ($ENV{'REQUEST_METHOD'} eq 'GET') {
@pairs = split(/&/, $ENV{'QUERY_STRING'});
}
elsif ($ENV{'REQUEST_METHOD'} eq 'POST') {
read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@pairs = split(/&/, $buffer);
}
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ s/<!--(.|\n)*-->//g;
$FORM{$name} = $value;
}
}
| |  | |  |
Comments:
|