#!/usr/local/bin/perl use strict; use warnings; use CGI qw(:standard); print header(); print < HTML print end_html();