home *** CD-ROM | disk | FTP | other *** search
/ Teach Yourself CGI Programming with Perl in a Week / CGIPROGRAMMINGPERL.iso / booksrc / 04cgil03.cgi < prev    next >
Encoding:
Text File  |  1995-11-22  |  718 b   |  52 lines
  1. #!/usr/local/bin/perl
  2. print "Content-type: text/html\n\n";
  3.  
  4. $date = `date`;
  5.  
  6. chop $date;
  7.  
  8. print <<"ending_print_tag"; 
  9. <html>
  10. <head>
  11. <title>CGI using Variables inside double quotation marks </title>
  12. <background="#000000" text="#F0F0F0" >
  13. </head>
  14. <body>
  15. <h1> CGI using Variables inside double quotation marks </h1>
  16. <p>
  17. <em> HELLO, INTERNET! </em>
  18. <br>
  19. Today is $date.
  20. <hr noshade>
  21. ending_print_tag
  22.  
  23. print <<'ending_print_tag'; 
  24. <h1> CGI using Variables inside single quotation marks </h1>
  25. <p>
  26. <em> HELLO, INTERNET! </em>
  27. <br>
  28. Today is $date.
  29. <hr noshade>
  30. Watch out cyber space, another programmer is on the loose ;-)
  31. </body>
  32. </html>
  33. ending_print_tag
  34.  
  35.  
  36.  
  37.  
  38.  
  39.  
  40.  
  41.  
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.