Honestly, I haven't been motivated to address this post since it'll take a bit of time and the issues I've already raised haven't been addressed.

I'd also like to see the following replaced with CGI or CGI::Simple:

#Parse Data
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/^\s+//;
        $FORM{$name} = $value;
}
[download]

That means that instances of $FORM{XXX} become calls to param.