print $query->header(
                        -type           => 'text/html',
                        -charset        => 'utf-8',
                        -status         => '400',  
                        -Content_Length => '100000',
                       );