#!/usr/bin/perl -wT use strict; use CGI::Carp qw(fatalsToBrowser warningsToBrowser); my $name = "jone"; print "Content-type: text/html\n\n"; print <<'HTML'; $name HTML