Perl: Convert a CGI Query String into a hash
Posted On: 2008-08-29
Convert a CGI query string into a hash variable or in other words a key/value pair.
if (defined $ENV{'QUERY_STRING'}){
foreach $input (split("&" $ENV{'QUERY_STRING'})){
if ($input =~ /(.*)=(.*)/){
$QueryHash{$1} = "$2";
}
}
}