#!/usr/bin/perl use CGI qw(:standard); use CGI::Carp qw(fatalsToBrowser); use strict; use diagnostics; my $who = param('name') || 'unknown'; print header(); print < Hello to $who
HERE