use strict; use CGI; { my $p = new CGI; print $p->header; print $p->start_html ("Title Page"); print $p->p (center ($p->font ({-size=>'+7'}, "This is a test"))); print $p->end_html; } #### Content-Type: text/html Title Page

This is a test