#!/usr/bin/perl -wT $|=1; print "Content-type: text/html\n\n"; use CGI::Carp('fatalsToBrowser'); use strict; use warnings; use CGI qw(:standard); use test2; $CGI::DISABLE_UPLOADS = 1; $CGI::POST_MAX = 51_200; $|=1; print header( "text/html" ), start_html(-title => "Hello World"); test2::hello(); print end_html();