Help for this page

Select Code to Download


  1. or download this
     <Location /perl>
     SetHandler perl-script
...
     PerlOptions +ParseHeaders
     Options +ExecCGI
  </Location>
  2. or download this
    use CGI qw(header);

my $html = defined($ENV{'SERVER_SOFTWARE'}) ? header : '';

# More stuff gets added to $html before it prints to STDOUT