use CGI qw(:all);

##</code><code>##

    $CGI::DISABLE_UPLOADS = 1;                    # Disable uploads
    $CGI::POST_MAX        = 512 * 1024;           # limit posts to 512K max
                                                  # set to personal needs, of course

##</code><code>##

    use CGI::Safe;
    my $CGI = CGI::Safe->new;