#!/usr/bin/perl
#################################################################
# FILE NAME: b.pl
# DESCRIPTION: CGI script example: string substitution within double-quotes.
# AUTHOR/DATE: B.A.Martin: 2013/04/05
#################################################################
#### SETUP STUFF -- just copy it. ####
use strict;
use CGI qw/:standard :newtag/; # NOTE the space after ":standard" (before "newtag:")
print header; # html code is now permitted to output.
my $who= "Donald Duck";
my $bg= '#ccccff';
my $nice= "great";
#### Now send some HTML stuff to make the web page. ####
print '';
print '';
print ' My CGI Program ';
print '';
# Double-quote allows substitution.
print "";
print " My name is $who,";
print " and I wrote this $nice CGI program!";
print "";
print "";