Re: I can't find error section of code

Since you want to handle CGI, I tried a different way:

package HandleCGIData2;

use strict;
use warnings;
use Apache qw(exit);

print &handler;

sub handler {

    local $^W = 1; #!/usr/bin/perl

    use CGI;

    my $q = CGI->new;
    my $them = $q->remote_host;
    my $name = 'John Doe';
    my $age = '50';
    print $q->header( 'text/html' ),
      $q->start_html(-title => 'My CGI Example');

    print <<EOT;
<html>
<head>
<title>HandleCGI</title>
</head>
<body bgcolor="#ffffff">
<h1>Using name and age</h1>
name = $name<br>
age = $age
</body>
</html>
EOT
print $q->end_html;
}
[download]

Comment on Re: I can't find error section of code Download Code