Perl help needed.

by "Grant Peel" <tracker(at)home.com>

 Date:  Sat, 22 Jan 2000 18:54:44 -0500
 To:  "HWG - Languages" <hwg-languages(at)hwg.org>
  todo: View Thread, Original
Hi all,

I am trying deperately to write pre formatted html to a file using the print
command. Can anyone see where I am going wronge?


#!/usr/bin/perl5
...
# Generate an HTML file using print command..

$PRINT =  "Content-type: text/html\n\n";
{
     $PRINT;
     open (ADDUSER, ">>../" . $filename);
     print qq~

<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="Author" content="Charles Manners">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
....
</body></html>
~;
close (ADDUSER);
exit;
}

Any help would be appreciated.

-Grant

Grant W. Peel
The Net Now Internet Services - info(at)thenetnow.com
Member:
HTML Writers Guild
International Webmasters Association

HWG: hwg-languages mailing list archives, maintained by Webmasters @ IWA