...
#use CGI::Compress::Gzip; # for compressing content
...
# try to find out if browser can handle gzipped data
# if yes, compress the http-body
my $cgi;
#if (exists $ENV{HTTP_ACCEPT_ENCODING} and
#    $ENV{HTTP_ACCEPT_ENCODING} =~ /gzip/i) { # added by havi - fuer GZIP
#    $cgi = CGI::Compress::Gzip->new();
#} # if
#else { # if not, just send plain text
    $cgi = CGI->new();
#} # else