#!/usr/bin/perl -w
use strict;
my $foo = 123.45;
my $bar = "Martha Stewedprune";
print <<"EOT";
=====
This is an example of
text taken literally
except that variables are
expanded where their
variable names appear.
foo: $foo
bar: $bar
EOT
####
=====
This is an example of
text taken literally
except that variables are
expanded where their
variable names appear.
foo: 123.45
bar: Martha Stewedprune
##
##
my $url = "http://www.maperl.com";
my $text = "Mother of Perl";
print <<"EOT";
$text
EOT
##
##
Mother of Perl