note
moxliukas
<p>Well, I think you forgot <code>use CGI;</code></p>
<p>Your code would look (untested):</p>
<code>
#!/usr/bin/perl -w
use strict;
use CGI qw/:standard/;
print header;
my $myvalue = param("test");
print <<EOS;
<BODY BGCOLOR=#FFFFFF>
<CENTER>
myvalue: $myvalue
</CENTER>
</BODY></HTML>
EOS
</code>
<p>Note that I have replaced a bunch of your <i>print</i> statements by using a <i>HEREDOC</i> syntax. Of course, you can do it with a few prints, but it very much neater this way. Oh, and you might want to use built in CGI functions for generating HTML.. For all your CGI needs, consult [perldoc://CGI] manual.</p>
<p>...And don't forget to use strict ;)</p>
203210
203210