#!/opl/lampp/bin/perl use strict; use CGI; ## RESPONSE TO XMLHTTP: my $response = CGI->new(); my ( $name, $age ) = ($response->param("name"), $response->param("age") ); if ( $name && $age ) { print "Content-type: text/html\n\n"; print ""; print "

Hello $name

"; print ""; } else { exit(0); }