Mega Code Archive

 

Categories / Perl / Language Basics

 

Assign text to a single variable

#!/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";