![]() |
![]() |
![]() |
![]() |
![]() |
![]() |
use CGI; use CGI::Out;
$query = new CGI; savequery $query; # to reconstruct input
$CGI::Out::mailto = 'fred'; # override default of $<
out $query->header(); out $query->start_html( -title=>'A test', -author=>'muir@idiom.com');
croak "We're outta here!"; confess "It was my fault: $!"; carp "It was your fault!"; warn "I'm confused"; die "I'm dying.\n";
use CGI::Out qw(carpout); carpout(\*LOG);
It wraps all of the functions provided by CGI::Carp and Carp. Do not ``use'' them directly, instead just ``use CGI::Out''.
Instead of print, use out
.
format
s is provided by CGI::Out.
$CommentsMailTo = "perl5@dcs.ed.ac.uk"; include("../syssies_footer.inc");?>