|
#!/usr/bin/perl
print "Content-Type: text/html \n\n";
# The code below makes it easy to change text output.
$company_name = "AUTO";
$cars_on_lot = 100;
$deal_of_day = "Ford";
print "<p>Welcome to $company_name!</p>\n";
print "<p>Which one of our $cars_on_lot cars is right for you?</p>\n";
print "<p>Today we have a GREAT deal on a $deal_of_day.</p>\n";
|