document.write("<div align=\"left\">\n");
document.write("  <table border=\"1\" cellpadding=\"5\" cellspacing=\"0\" bordercolorlight=\"#000000\" bordercolordark=\"#FFFFFF\">\n");
document.write("    <tr>\n");
document.write("      <td bgcolor=\"#B0B898\"><font face=\"Verdana\" size=\"4\"><b>News Headlines\n");
document.write("        </b></font></td>\n");
document.write("    </tr>\n");
document.write("    <tr>\n");
document.write("      <td><font face=\"Verdana\" size=\"2\"><!-- individual news line even items -->\n");
document.write("  <table border=\"0\" cellpadding=\"3\" cellspacing=\"0\" width=\"100%\">\n");
document.write("    <tr>\n");
document.write("      <td valign=\"top\" align=\"left\" bgcolor=\"#D0D0D0\"><font face=\"Tahoma\" size=\"1\"><b><a href=\"http://www.cgiscr"+"ipt.net/cgi-scr"+"ipt/csNews/csNews.cgi?database=perl%2edb&command=viewone&id=8&op=t\">Perl Variable HTML Escape and UnEscape</a></b>\n");
document.write("       <br> <br>\n");
document.write("        <br>Use this code to convert non-word characters to the html format. This is useful for displaying forms populated with variables that have odd characters or for 'escaping' variables prior to saving them to a database. </font>\n");
document.write("        </td>\n");
document.write("    </tr>\n");
document.write("  </table>\n");
document.write("<!-- end this line item --><!-- individual news line odd items -->\n");
document.write("  <table border=\"0\" cellpadding=\"3\" cellspacing=\"0\" width=\"100%\">\n");
document.write("    <tr>\n");
document.write("      <td valign=\"top\" align=\"left\" bgcolor=\"#C0D8D8\"><font face=\"Tahoma\" size=\"1\"><b><a href=\"http://www.cgiscr"+"ipt.net/cgi-scr"+"ipt/csNews/csNews.cgi?database=perl%2edb&command=viewone&id=7&op=t\">Perl Debug Tool</a></b>\n");
document.write("        <br> <br>\n");
document.write("        <br>Use this code to display environment variables and form variables. The form variables are assumed to be in the %in associative array (as extracted by the &getdata subroutine show in a previous example). This is generally used when the scr"+"ipt encounters an error and is very useful for debugging.</font>\n");
document.write("        </td>\n");
document.write("    </tr>\n");
document.write("  </table>\n");
document.write("<!-- end this line item -->\n");
document.write("<!-- individual news line even items -->\n");
document.write("  <table border=\"0\" cellpadding=\"3\" cellspacing=\"0\" width=\"100%\">\n");
document.write("    <tr>\n");
document.write("      <td valign=\"top\" align=\"left\" bgcolor=\"#D0D0D0\"><font face=\"Tahoma\" size=\"1\"><b><a href=\"http://www.cgiscr"+"ipt.net/cgi-scr"+"ipt/csNews/csNews.cgi?database=perl%2edb&command=viewone&id=6&op=t\">Perl Form Variable Extractor</a></b>\n");
document.write("       <br> <br>\n");
document.write("        <br>Use this code to extract the fields submitted on an html form. It can also be used to parse the information after the '?' in the url. </font>\n");
document.write("        </td>\n");
document.write("    </tr>\n");
document.write("  </table>\n");
document.write("<!-- end this line item --><!-- individual news line odd items -->\n");
document.write("  <table border=\"0\" cellpadding=\"3\" cellspacing=\"0\" width=\"100%\">\n");
document.write("    <tr>\n");
document.write("      <td valign=\"top\" align=\"left\" bgcolor=\"#C0D8D8\"><font face=\"Tahoma\" size=\"1\"><b><a href=\"http://www.cgiscr"+"ipt.net/cgi-scr"+"ipt/csNews/csNews.cgi?database=perl%2edb&command=viewone&id=5&op=t\">Perl Popup Error Window</a></b>\n");
document.write("        <br> <br>\n");
document.write("        <br>Use this code to display a popup window from a perl scr"+"ipt. The most common use is to indicate to the user that something has happened, like they haven't filled out all the required fields on a form.</font>\n");
document.write("        </td>\n");
document.write("    </tr>\n");
document.write("  </table>\n");
document.write("<!-- end this line item -->\n");
document.write("<!-- individual news line even items -->\n");
document.write("  <table border=\"0\" cellpadding=\"3\" cellspacing=\"0\" width=\"100%\">\n");
document.write("    <tr>\n");
document.write("      <td valign=\"top\" align=\"left\" bgcolor=\"#D0D0D0\"><font face=\"Tahoma\" size=\"1\"><b><a href=\"http://www.cgiscr"+"ipt.net/cgi-scr"+"ipt/csNews/csNews.cgi?database=perl%2edb&command=viewone&id=4&op=t\">Perl Email Syntax Checker</a></b>\n");
document.write("       <br> <br>\n");
document.write("        <br>Use this code to test an email address for proper syntax. It will return '1' if the email address passes or a '0' if it fails. You can use it in conjunction with the Ace Perl Popup Window to let the user know they entered an invalid email address.</font>\n");
document.write("        </td>\n");
document.write("    </tr>\n");
document.write("  </table>\n");
document.write("<!-- end this line item --><!-- individual news line odd items -->\n");
document.write("  <table border=\"0\" cellpadding=\"3\" cellspacing=\"0\" width=\"100%\">\n");
document.write("    <tr>\n");
document.write("      <td valign=\"top\" align=\"left\" bgcolor=\"#C0D8D8\"><font face=\"Tahoma\" size=\"1\"><b><a href=\"http://www.cgiscr"+"ipt.net/cgi-scr"+"ipt/csNews/csNews.cgi?database=perl%2edb&command=viewone&id=3&op=t\">Perl Cookie Retrieval</a></b>\n");
document.write("        <br> <br>\n");
document.write("        <br>Use this code to populate an associative array with the users cookies.</font>\n");
document.write("        </td>\n");
document.write("    </tr>\n");
document.write("  </table>\n");
document.write("<!-- end this line item -->\n");
document.write("<!-- individual news line even items -->\n");
document.write("  <table border=\"0\" cellpadding=\"3\" cellspacing=\"0\" width=\"100%\">\n");
document.write("    <tr>\n");
document.write("      <td valign=\"top\" align=\"left\" bgcolor=\"#D0D0D0\"><font face=\"Tahoma\" size=\"1\"><b><a href=\"http://www.cgiscr"+"ipt.net/cgi-scr"+"ipt/csNews/csNews.cgi?database=perl%2edb&command=viewone&id=2&op=t\">Perl Template Creator</a></b>\n");
document.write("       <br> <br>\n");
document.write("        <br>Use this code to create easily modifiable html templates for use in your perl cgis.</font>\n");
document.write("        </td>\n");
document.write("    </tr>\n");
document.write("  </table>\n");
document.write("<!-- end this line item --><!-- individual news line odd items -->\n");
document.write("  <table border=\"0\" cellpadding=\"3\" cellspacing=\"0\" width=\"100%\">\n");
document.write("    <tr>\n");
document.write("      <td valign=\"top\" align=\"left\" bgcolor=\"#C0D8D8\"><font face=\"Tahoma\" size=\"1\"><b><a href=\"http://www.cgiscr"+"ipt.net/cgi-scr"+"ipt/csNews/csNews.cgi?database=perl%2edb&command=viewone&id=1&op=t\">Perl Name Formatter</a></b>\n");
document.write("        <br> <br>\n");
document.write("        <br>Use this code to format common names. For example, john doe III, will be converted to John Doe III.</font>\n");
document.write("        </td>\n");
document.write("    </tr>\n");
document.write("  </table>\n");
document.write("<!-- end this line item -->\n");
document.write("\n");
document.write("<scr"+"ipt language=javascr"+"ipt>\n");
document.write("var win=null;\n");
document.write("function Viewperl2edb322(id){\n");
document.write("var rndURL = (1000*Math.random());\n");
document.write("var myname=\"\";\n");
document.write("var w = \"640\";\n");
document.write("var h = \"480\";\n");
document.write("var pos = \"center\";\n");
document.write("if(\"center\" == \"absolute\"){\n");
document.write("var TopPosition = 0;\n");
document.write("var LeftPosition = 0;\n");
document.write("}\n");
document.write("var mypage = \"http://www.cgiscr"+"ipt.net/cgi-scr"+"ipt/csNews/csNews.cgi?database=perl%2edb&command=viewone&op=t&id=\"+id+\"&rnd=\"+rndURL;\n");
document.write("if(pos==\"random\"){LeftPosition=(screen.width)?Math.floor(Math.random()*(screen.width-w)):100;TopPosition=(screen.height)?Math.floor(Math.random()*((screen.height-h)-75)):100;}\n");
document.write("if(pos==\"center\"){LeftPosition=(screen.width)?(screen.width-w)/2:100;TopPosition=(screen.height)?(screen.height-h)/2:100;}\n");
document.write("else if((pos!=\"center\" && pos!=\"random\" && pos!= \"absolute\") || pos==null){LeftPosition=0;TopPosition=20}\n");
document.write("settings='width='+w+',height='+h+',top='+TopPosition+',left='+LeftPosition+',scrollbars=yes,location=no,directories=no,status=no,menubar=yes,toolbar=no,resizable=yes';\n");
document.write("win=window.open(mypage,myname,settings);\n");
document.write("if(win.focus){win.focus();}}\n");
document.write("</scr"+"ipt>\n");
document.write("</font></td>\n");
document.write("    </tr>\n");
document.write("  </table>\n");
document.write("</div>\n");