use CGI::Carp qw(fatalsToBrowser warningsToBrowser); use CGI qw(:standard); print header; warningsToBrowser(1);