#!/usr/bin/perl use warnings; use CGI qw(:standard); use strict; print header(); print < test of javascript
HERE #### print < Thanks!

Thanks for visiting our site : $username!

END_HTML