Derek,
I think your best solution is to use print qq(.....); instead of print ".....";
print (Content-type:
text/html\n\n<HTML><HEAD><TITLE>Endless!</TITLE></HEAD><BODY BGCOLOR =
"#000000"><FONT COLOR = "red"><H5>$current</H5><HR COLOR = "red"><A HREF =
"endless?$prev">Previous Page</a> | <A HREF = "endless?$next">Next
Page</A></FONT></BODY></HTML>);
>----- Original Message -----
>From: Derek Duhon <[EMAIL PROTECTED]>
>To: <[EMAIL PROTECTED]>
>Sent: Sunday, June 03, 2001 11:29 AM
>Subject: problem
>
>
>I have a print statement that prints out an html page, and after a lot of
>tinkering, I still can't get it to work. It prints out the html perfectly,
>but I can't seem to find a way for it to print the contents of the scalar
>statements. The print statement is encased in "". Here is my source
>
>#!usr/local/bin/perl
>#
>#Program to generate endless webpage
>$current = $ENV{"QUERY_STRING"};
>$next = ++$current;
>$prev = --$current;
>print "Content-type:
>text/html\n\n<HTML><HEAD><TITLE>Endless!</TITLE></HEAD><BODY BGCOLOR =
>"#000000"><FONT COLOR = "red"><H5>$current</H5><HR COLOR = "red"><A HREF =
>"endless?$prev">Previous Page</a> | <A HREF = "endless?$next">Next
>Page</A></FONT></BODY></HTML>";
>
Bill Wood
University of California at San Diego
Administrative Computing and Telecommunications - 0929
10280 North Torrey Pines Rd.
La Jolla, Ca 92093-0929
EMail: [EMAIL PROTECTED]
Phone: 858/534-1291
Fax: 858/534-7656
