Help for this page

Select Code to Download

Select or download this

   if ($ENV{'REQUEST_METHOD'} eq 'GET') {
         $buffer = $ENV{'QUERY_STRING'};
...
         $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
         $FORM{$name} = $value;
   }

Select or download this
```
use CGI 'Vars';
my %FORM = Vars();
```