I needed a lot of backslashes.I will never forget it.Anyway this i show it looks:
#!/usr/bin/perl
use strict;
use CGI;
print "Content-type: text/html\n\n";
print "<html><head><title>Nocc Call Log</title></head>\n";
print "<body bgcolor=\"#FFFFFF\">\n";
print "<h1>Nocc Call Log</h1>\n";
print "<table border=\"4\">\n";
print "<form action=\"post.cgi\" method=\"POST\">\n";
print "<tr>\n";
print "<td>\n";
print "<h3>Callers Name: <input type=\"text\" name=\"caller\" size=\"
+25\"></h3>\n";
print "</td>\n";
print "<td bgcolor=\"#FFDEAD\">\n";
print "<h3>Auto Time : <input TYPE=\"radio\" NAME=\"time-Type\" V
+ALUE=\"auto_time\"></h3>\n";
print "<br>\n";
print "<h3>Manual Time : <input TYPE=\"radio\" NAME=\"time-Type\" V
+ALUE=\"manual_time\"></h3>\n";
print "</td>\n";
print "<td bgcolor=\"#FFDEAD\">\n";
print "<h3>Time: <input type=\"text\" name=\"time\"></h3>\n";
print "</td>\n";
print "</tr>\n";
print "<tr>\n";
print "<td bgcolor=\"#8080FF\">\n";
print "<h3>Message For:</h3>\n";
print "</td>\n";
print "<td colspan=\"2\">\n";
print "<INPUT TYPE=\"hidden\" NAME=\"for\" VALUE=\"People\" size=\"2\"
+>\n";
print "<SELECT NAME=\"for\">";
print "<OPTION VALUE=\"people\">Dennis </OPTION>";
print "<OPTION SELECTED VALUE=\"people\">alex</OPTION>";
print "<OPTION VALUE=\"people\">andrew </OPTION>";
print "<OPTION VALUE=\"people\">Irving</OPTION>";
print "<OPTION VALUE=\"people\">Freddy</OPTION>";
print "<OPTION VALUE=\"people\">Ken</OPTION>";
print "<OPTION VALUE=\"people\">Mike</OPTION>";
print "<OPTION VALUE=\"people\">Tim</OPTION>";
print "<OPTION VALUE=\"people\">Bob</OPTION>";
print "<OPTION VALUE=\"people\">Ashley</OPTION>";
print "<OPTION VALUE=\"people\">Richard</OPTION>";
print "<OPTION VALUE=\"people\">Terrance</OPTION>";
print "<OPTION VALUE=\"people\">Ronald</OPTION>";
print "<OPTION VALUE=\"people\">Phil</OPTION>";
print "</td>\n";
print "</tr>\n";
print "<tr>\n";
print "<td bgcolor=\"#808080\">\n";
print "<h3> Message Taken by:</h3>\n";
print "</td>\n";
print "<td colspan=\"2\">\n";
print "<INPUT TYPE=\"hidden\" NAME=\"by\" VALUE=\"persons\" size=\"2\"
+>\n";
print "<SELECT NAME=\"by\">";
print "<OPTION VALUE=\"people\">Dennis </OPTION>";
print "<OPTION VALUE=\"people\">alex</OPTION>";
print "<OPTION VALUE=\"people\">andrew </OPTION>";
print "<OPTION VALUE=\"people\">Irving</OPTION>";
print "<OPTION VALUE=\"people\">Freddy</OPTION>";
print "<OPTION VALUE=\"people\">Ken</OPTION>";
print "<OPTION VALUE=\"people\">Mike</OPTION>";
print "<OPTION VALUE=\"people\">Tim</OPTION>";
print "<OPTION SELECTED VALUE=\"people\">Bob</OPTION>";
print "<OPTION VALUE=\"people\">Ashley</OPTION>";
print "<OPTION VALUE=\"people\">Richard</OPTION>";
print "<OPTION VALUE=\"people\">Terrance</OPTION>";
print "<OPTION VALUE=\"people\">Ronald</OPTION>";
print "<OPTION VALUE=\"people\">Phil</OPTION>";
print "</td>\n";
print "</tr>\n";
print "<tr>\n";
print "<td colspan=\"3\">\n";
print "<h3> Description: </h3> \n";
print "<input type=\"text\" name=\"smessage\" size=\"90\">\n";
print "</td>\n";
print "</tr>\n";
print "<tr>\n";
print "<td colspan=\"4\">\n";
print "<h3>Message:<textarea name=\"the_textarea_tags_name\" cols=\"90
+\" rows=\"5\">Message Here</textarea></h3>\n";
print "</td>\n";
print "</tr>\n";
print "<tr>\n";
print "<td>\n";
print "<input type=\"submit\" value=\" Send \">\n";
print "</td>\n";
print "<td>\n";
print "<input type=\"reset\" value=\"Clear Form\">\n";
print "</td>\n";
print "</tr>\n";
print "</form>\n";
print "</table>\n";
print "</body></html>";
And it seems to work
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|