| | |
Script only displaying last entries made
Thread Solved |
•
•
Join Date: Sep 2005
Posts: 175
Reputation:
Solved Threads: 0
I thought this script was working. I absolutely cannot get IIS to fully and completely work on my home comp. After making a special trip to school to test this thing out, it ends up that it's only displaying the last data entered instead of the averages, totals, etc. This thing is due for class tomorrow. I've changed around a few things here & there and it's still working no better (no worse either, far as that goes). Anyone have a clue what I need to do? In case it's needed, I'll post both the .html & the .cgi.
Perl Syntax (Toggle Plain Text)
#!C:/Perl/bin/perl.exe #Football Stats print "Content-type: text/html\n\n"; use CGI qw(:standard); use strict; use SDBM_File; use Fcntl; ##########variable declarations and input assignments############################# my ($yourTmScore, $otherTmScore, $passYrdPGame, $rushYrdPGame, $homeCount, $awayCount, $turnovAllowedPGame, $tds, $tdsAllowed, $sacksTotal, $sacksPerGameAvg, $sacksAllowedTotal, $sacksAllowedAvg, $turnovForcedTotal, $turnovForcedAvg, $turnovAllowedTotal, $turnovAllowedAvg, $wins, $losses, $winPercent, $winPercentHome, $winPercentAway, $winLose, $tieGames, $tdsAllowedTotal, $rushYrdTotal, $passYrdTotal, $tdsTotal, $tdsAvg, $tdsAllowedAvg, $tdsAvg, $rushYrdAvg, $yourTmScoreTotal, $otherTmScoreTotal, $otherTmScoreAvg, $yourTmScoreAvg, $passYrdAvg); my $weekNum = param('weekNum'); my $whereAt = param('gamePlayed'); my $homeCounter = 0; my $awayCounter = 0; my $yourTmScore = param('yourTmScore'); my $otherTmScore = param('otherTmScore'); my $passYrdPGame = param('passYrdPGame'); my $rushYrdPGame = param('rushYrdPGame'); my $sacks = param('sacks'); my $sacksAllowed = param('sacksAllowed'); my $turnovForcedPerGame = param('turnovForcedPerGame'); my $turnovAllowedPGame = param('turnovAllowedPGame'); my $tds = param('tds'); my $tdsTotal = $tds + $tdsTotal; my $tdsAllowed = param('tdsAllowed'); $tdsAllowedTotal = $tdsAllowed + $tdsAllowedTotal; $rushYrdTotal = $rushYrdPGame + $rushYrdTotal; $passYrdTotal = $passYrdPGame + $passYrdTotal; $yourTmScoreTotal = $yourTmScore + $yourTmScoreTotal; $otherTmScoreTotal = $otherTmScore + $otherTmScoreTotal; $sacksTotal = $sacks + $sacksTotal; $sacksAllowedTotal = $sacksAllowed + $sacksAllowedTotal; $turnovForcedTotal = $turnovForcedTotal + $turnovForcedPerGame; $turnovAllowedTotal = $turnovAllowedTotal + $turnovAllowedPGame; ########save to file####################################### open(OUTFILE, ">>","nflStats.txt") or die "Error opening nflStats.txt $!, stopped"; print OUTFILE join(':::', $weekNum, $whereAt, $yourTmScore, $otherTmScore, $passYrdPGame, $rushYrdPGame, $sacks, $sacksAllowed, $turnovForcedPerGame, $turnovAllowedPGame, $tds, $tdsAllowed), "\n"; close(OUTFILE); ####################### do calculations (in while loop) ################## open(INFILE, "<", "nflStats.txt"); my $ctr = 0; while(<INFILE>) { $ctr = $ctr + 1; my ($weekNum, $whereAt, $yourTmScore, $otherTmScore, $passYrdPGame, $rushYrdPGame, $sacks, $sacksAllowed, $turnovForcedPerGame, $turnovAllowedPGame, $tds, $tdsAllowed) = split(':::'); my $tdsAvg = $tdsAvg/$ctr; my $tdsAllowedAvg = $tdsAllowedAvg/$ctr; my $rushYrdAvg = $rushYrdTotal/$ctr; my $passYrdAvg = $passYrdTotal/$ctr; my $yourTmScoreAvg = $yourTmScoreTotal/$ctr; my $otherTmScoreAvg = $otherTmScoreTotal/$ctr; my $sacksPerGameAvg = $sacksTotal/$ctr; my $sacksAllowedAvg = $sacksAllowedTotal/$ctr; my $turnovForcedAvg = $turnovForcedTotal/$ctr; my $turnovAllowedAvg = $turnovAllowedTotal/$ctr; if ($whereAt eq 'Home') { $homeCounter = $homeCounter + 1; } elsif ($whereAt eq 'Away') { $awayCounter = $awayCounter + 1; } if ($yourTmScore > $otherTmScore) { $wins = $wins + 1; } else { $losses = $losses + 1; } if ($yourTmScore == $otherTmScore) { $tieGames = $tieGames + 1; } } close INFILE; ######################### end while loop ######################### ################ generate page ######################### print <<endHtml; <html> <head><title>Current Cowboys Statistics</title> <script type="text/javascript"> window.defaultStatus = "Results so far..."; </script></head> <body link="navy" vlink="navy" alink="navy"> <font size="3"> <font size="6"><div align="center">Weeks played: $weekNum</div></font><br /><br /> <hr width="90%" color="#CCCCCC" size="4"><br /><br /> <p> <table width="750" border="1" bgcolor="navy" align="center"> <tr> <td colspan="4" bgcolor="white"><font size="4" color="navy"><div align="center"><b>SCORING</b></div></font></td> </tr> <tr><td colspan="2"><font size="3" color="white"><div align="center"><b>OWN</b></div></font></td><td colspan="2"><font size="3" color="white"><div align="center"><b>OPPONENT</b></div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">Points Scored Total</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Points Averaged per Game</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Points Allowed Total</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Points Allowed Avg. per Game</div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">$yourTmScoreTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$yourTmScoreAvg</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$otherTmScoreTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$otherTmScoreAvg</div></font></td> </tr> </table> </p><br /> <table width="85%" border="0" align="center"> <tr> <td width="50%" align="center"> <p> <table width="300" border="1" bgcolor="navy"> <tr> <td colspan="2" bgcolor="white"><b><font size="4" color="navy"><div align="center">GAME LOCATIONS</div></font></b></td> </tr> <tr> <td width="50%"><div align="center"><font size="3" color="white">Home:</font></div></td> <td width="50%"><div align="center"><font size="3" color="white">Away:</font></div></td> </tr> <tr> <td width="50%"><div align="center"><font size="3" color="white">$homeCounter</font></div></td> <td width="50%"><div align="center"><font size="3" color="white">$awayCounter</font></div></td> </tr> </table> </p> </td> <td width="50%" align="center"> <p> <table width="300" border="1" bgcolor="navy"> <tr> <td colspan="3" bgcolor="white"><font size="4" color="navy"><div align="center"><b>WINS & LOSSES</b></div></font></td> </tr> <tr> <td width="33%"><div align="center"><font size="3" color="white">Wins</font></td> <td width="33%"><div align="center"><font size="3" color="white">Losses</font></td> <td width="33%"><div align="center"><font size="3" color="white">Ties</font></td> </tr> <tr> <td width="33%"><div align="center"><font size="3" color="white">$wins</font></td> <td width="33%"><div align="center"><font size="3" color="white">$losses</font></td> <td width="33%"><div align="center"><font size="3" color="white">$tieGames</font></td> </tr> </table> </p> </td> </tr> </table><br /> <p> <table width="750" border="1" bgcolor="navy" align="center"> <tr> <td colspan="4"bgcolor="white"><font size="4" color="navy"><div align="center"><b>TOUCHDOWNS</b></div></font></td> </tr> <tr><td colspan="2"><font size="3" color="white"><div align="center"><b>TD's MADE</b></div></font></td><td colspan="2"><font size="3" color="white"><div align="center"><b>TD's ALLOWED</b></div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">Total Touchdowns</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">TD's Avg. per Game</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Total Touchdowns Allowed</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">TD's Allowed Avg. per Game</div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">$tdsTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$tdsAvg</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$tdsAllowedTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$tdsAllowedAvg</div></font></td> </tr> </table> </p><br /> <p> <table width="750" border="1" bgcolor="navy" align="center"> <tr> <td colspan="4" bgcolor="white"><font size="4" color="navy"><div align="center"><b>OFFENSIVE PERFORMANCE</b></div></font></td> </tr> <tr><td colspan="2"><font size="3" color="white"><div align="center"><b>RUSHING YARDS</b></div></font></td><td colspan="2"><font size="3" color="white"><div align="center"><b>PASSING YARDS</b></div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">Total Rushing Yards</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Rushing Yards Avg. per Game</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Total Passing Yards</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Passing Yards Avg. per Game</div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">$rushYrdTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$rushYrdAvg</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$passYrdTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$passYrdAvg</div></font></td> </tr> </table> </p><br /> <p> <table width="750" border="1" bgcolor="navy" align="center"> <tr> <td colspan="4" bgcolor="white"><font size="4" color="navy"><div align="center"><b>SACKS</b></div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">Total Sacks Made</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Sacks Made Avg. per Game</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Total Sacks Allowed</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Sacks Allowed Avg. per Game</div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">$sacksTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$sacksPerGameAvg</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$sacksAllowedTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$sacksAllowedAvg</div></font></td> </tr> </table> </p><br /> <p> <table width="750" border="1" bgcolor="navy" align="center"> <tr> <td colspan="4" bgcolor="white"><font size="4" color="navy"><div align="center"><b>TURNOVERS</b></div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">Total Turnovers Made</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Turnovers Avg. per Game</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Total Turnovers Allowed</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Turnovers Allowed Avg. per Game</div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">$turnovForcedTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$turnovForcedAvg</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$turnovAllowedTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$turnovAllowedAvg</div></font></td> </tr> </table> </p><br /> <p><font size="5" face="Arial Black"><a href="" onclick="self.close();">Close Window</a><br /><br /> <a href="C:\Inetpub\wwwroot\public_html\Perl Semester Project\nflStats.html">Enter more stats</a></font></p> </font> </body></html> endHtml
Perl Syntax (Toggle Plain Text)
<!nflStats.html> <html> <head><title>Stats For the Dallas Cowboys</title> <script type="text/javascript"> window.defaultStatus = "Keep up with the Cowboys this year!"; function confirmSubmit() { var submitForm = window.confirm("Make sure that all of the fields have been filled in completely."); if (submitForm == true) return true; return false; } function confirmReset() { var resetForm = window.confirm("Are you sure you want to clear all of the above contents?"); if (resetForm == true) return true; return false; } function showPics(linkTarget) { picWindow = window.open(linkTarget, "showPics", "toolbar=no,menubar=no,location=no,scrollbars=no,resiable=no,width=550,height=570"); } </script></head> <body background="nflShield.bmp"> <table width="55%" border="0" align="center" cellpadding="5"> <tr> <td bgcolor="#000066"><div align="center"><font size="5" color="#FFFFFF">Use the fields below to enter weekly stats<br />for the Dallas Cowboys.</font></div></td> </tr> </table> <form action="http://localhost/cgi-bin/nflStats.cgi" method="post" onsubmit="return confirmSubmit();" onreset="return confirmReset();"> <font size="4" face="Arial"> <table width="97%" border="0" align="center"> <tr><td colspan="4"><hr color="#CCCCCC" /></td></tr> <tr> <td width="25%" valign="top" align="left"> <p>Week of the game: <select name="weekNum"> <option></option> <option>1</option> <option>2</option> <option>3</option> <option>4</option> <option>5</option> <option>6</option> <option>7</option> <option>8</option> <option>9</option> <option>10</option> <option>11</option> <option>12</option> <option>13</option> <option>14</option> <option>15</option> <option>16</option> <option>17</option> </select></p> </td> <td width="25%" align="right" valign="top"> <p>Played at:<br /> Home<input type="radio" name="gamePlayed" value="Home"> Away<input type="radio" name="gamePlayed" value="Away"></p> </td> <td width="25%" align="right" valign="top"> <p>Touchdowns: <input type="text" name="tds" size="3" maxlength="2"></p> </td> <td width="25%" align="right" valign="top"> <p>Touchdowns Allowed <input type="text" name="tdsAllowed" size="3" maxlength="2"></p> </td> </tr> <tr><td colspan="4"><hr color="#CCCCCC" /></td></tr> <tr> <td width="25%" valign="top" align="left"> <p>Cowboys' Score: <input type="text" name="yourTmScore" size="3" maxlength="3"></p> </td> <td width="25%" align="right"> <p>Opponent's Score: <input type="text" name="otherTmScore" size="3" maxleghth="3"></p> </td> <td width="25%" align="right" valign="top"> <p>Passing Yards: <input type="text" name="passYrdPGame" size="4" maxlength="3"></p> </td> <td width="25%" valign="top" align="right"> <p>Rushing Yards: <input type="text" name="rushYrdPGame" size="4" maxlength="3"></p> </td> </tr> <tr><td colspan="4"><hr color="#CCCCCC" /></td></tr> <tr> <td width="25%" align="left" valign="top"> Sacks Made: <input type="text" name="sacks" size="3" maxlength="2"> </td> <td width="25%" align="right" valign="top"> Sacks Allowed: <input type="text" name="sacksAllowed" size="3" maxlength="2"> </td> <td width="25%" valign="top" align="right"> Turn Overs Forced: <input type="text" name="turnovForcedPerGame" size="3" maxlength="2"> </td> <td width="25%" align="right" valign="top"> Turn Overs Allowed: <input type="text" name="turnovAllowedPGame" size="3" maxlength="2"> </td> </tr> </table> </font> <div align="right"><input type="submit" value="Submit Stats"> <input type="reset" value="Reset Stats"></div> </form><br /> <table width="85%" align="center" border="0"> <tr> <td width="50% align="left" valign="top"> <script type="text/javascript"> // Create arrays to contain all the values // for links and image locations var link = new Array; var image = new Array; link[1] = 'http://www.dallascowboys.com'; link[2] = "http://www.nfl.com"; link[3] = "http://www.nflplayers.com"; link[4] = "http://www.nfl.com/probowl"; link[5] = "http://www.superbowl.com"; image[1] = "bannerCowboysDotCom.jpg"; image[2] = "bannerNFLDotCom.jpg"; image[3] = "bannerNFLPlayers.jpg"; image[4] = "bannerProBowl.jpg"; image[5] = "bannerSuperBowl.jpg"; // Create a random number between 1 and last number random_num = (Math.round((Math.random()*4)+1)); // Write a link and images with random array document.write('<a href="' + link[random_num] + '" target="_blank">'); document.write('<img src="' + image[random_num] + '" border="0"></a>'); </script> </td> <td width="50%" align="right" valign="top"> <a href="cpic1.html" onmouseover="self.status='View Cowboys pictures here';return true" onclick="showPics('cpic1.html');return false"><img src="cowboyPics.jpg" border="0"></a> </td> </tr> </table> </body> </html>
You have to generate your output while the file is opened and you are processing the data line by line. You generate the output after the file is closed, so naturally you will only ever get the last line of the file. A generic example of one way to do it:
Perl Syntax (Toggle Plain Text)
print "<table>"; while (<INPUT_FROM_FILE>) { # do some stuff here with your data like split() and calculating averages, etc. print "<tr><td>$yourdata</td></tr>\n"; } print "</table>";
•
•
Join Date: Sep 2005
Posts: 175
Reputation:
Solved Threads: 0
So do I need to put a while loop in for each single cell, or can I do it like this:
-I can't truly run it at home to know for sure.
Perl Syntax (Toggle Plain Text)
#!C:/Perl/bin/perl.exe #Football Stats print "Content-type: text/html\n\n"; use CGI qw(:standard); use strict; use SDBM_File; use Fcntl; ##########variable declarations and input assignments############################# my ($yourTmScore, $otherTmScore, $passYrdPGame, $rushYrdPGame, $homeCount, $awayCount, $turnovAllowedPGame, $tds, $tdsAllowed, $sacksTotal, $sacksPerGameAvg, $sacksAllowedTotal, $sacksAllowedAvg, $turnovForcedTotal, $turnovForcedAvg, $turnovAllowedTotal, $turnovAllowedAvg, $wins, $losses, $winPercent, $winPercentHome, $winPercentAway, $winLose, $tieGames, $tdsAllowedTotal, $rushYrdTotal, $passYrdTotal, $tdsTotal, $tdsAvg, $tdsAllowedAvg, $tdsAvg, $rushYrdAvg, $yourTmScoreTotal, $otherTmScoreTotal, $otherTmScoreAvg, $yourTmScoreAvg, $passYrdAvg); my $weekNum = param('weekNum'); my $whereAt = param('gamePlayed'); my $homeCounter = 0; my $awayCounter = 0; my $yourTmScore = param('yourTmScore'); my $otherTmScore = param('otherTmScore'); my $passYrdPGame = param('passYrdPGame'); my $rushYrdPGame = param('rushYrdPGame'); my $sacks = param('sacks'); my $sacksAllowed = param('sacksAllowed'); my $turnovForcedPerGame = param('turnovForcedPerGame'); my $turnovAllowedPGame = param('turnovAllowedPGame'); my $tds = param('tds'); my $tdsTotal = $tds + $tdsTotal; my $tdsAllowed = param('tdsAllowed'); $tdsAllowedTotal = $tdsAllowed + $tdsAllowedTotal; $rushYrdTotal = $rushYrdPGame + $rushYrdTotal; $passYrdTotal = $passYrdPGame + $passYrdTotal; $yourTmScoreTotal = $yourTmScore + $yourTmScoreTotal; $otherTmScoreTotal = $otherTmScore + $otherTmScoreTotal; $sacksTotal = $sacks + $sacksTotal; $sacksAllowedTotal = $sacksAllowed + $sacksAllowedTotal; $turnovForcedTotal = $turnovForcedTotal + $turnovForcedPerGame; $turnovAllowedTotal = $turnovAllowedTotal + $turnovAllowedPGame; ########save to file####################################### open(OUTFILE, ">>","nflStats.txt") or die "Error opening nflStats.txt $!, stopped"; print OUTFILE join(':::', $weekNum, $whereAt, $yourTmScore, $otherTmScore, $passYrdPGame, $rushYrdPGame, $sacks, $sacksAllowed, $turnovForcedPerGame, $turnovAllowedPGame, $tds, $tdsAllowed), "\n"; close(OUTFILE); ####################### do calculations (in while loop) ################## open(INFILE, "<", "nflStats.txt"); my $ctr = 0; while(<INFILE>) { $ctr = $ctr + 1; my ($weekNum, $whereAt, $yourTmScore, $otherTmScore, $passYrdPGame, $rushYrdPGame, $sacks, $sacksAllowed, $turnovForcedPerGame, $turnovAllowedPGame, $tds, $tdsAllowed) = split(':::'); my $tdsAvg = $tdsAvg/$ctr; my $tdsAllowedAvg = $tdsAllowedAvg/$ctr; my $rushYrdAvg = $rushYrdTotal/$ctr; my $passYrdAvg = $passYrdTotal/$ctr; my $yourTmScoreAvg = $yourTmScoreTotal/$ctr; my $otherTmScoreAvg = $otherTmScoreTotal/$ctr; my $sacksPerGameAvg = $sacksTotal/$ctr; my $sacksAllowedAvg = $sacksAllowedTotal/$ctr; my $turnovForcedAvg = $turnovForcedTotal/$ctr; my $turnovAllowedAvg = $turnovAllowedTotal/$ctr; if ($whereAt eq 'Home') { $homeCounter = $homeCounter + 1; } elsif ($whereAt eq 'Away') { $awayCounter = $awayCounter + 1; } if ($yourTmScore > $otherTmScore) { $wins = $wins + 1; } else { $losses = $losses + 1; } if ($yourTmScore == $otherTmScore) { $tieGames = $tieGames + 1; } ################ generate page ######################### print <<endHtml; <html> <head><title>Current Cowboys Statistics</title> <script type="text/javascript"> window.defaultStatus = "Results so far..."; </script></head> <body link="navy" vlink="navy" alink="navy"> <font size="3"> <font size="6"><div align="center">Weeks played: $weekNum</div></font><br /><br /> <hr width="90%" color="#CCCCCC" size="4"><br /><br /> <p> <table width="750" border="1" bgcolor="navy" align="center"> <tr> <td colspan="4" bgcolor="white"><font size="4" color="navy"><div align="center"><b>SCORING</b></div></font></td> </tr> <tr><td colspan="2"><font size="3" color="white"><div align="center"><b>OWN</b></div></font></td><td colspan="2"><font size="3" color="white"><div align="center"><b>OPPONENT</b></div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">Points Scored Total</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Points Averaged per Game</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Points Allowed Total</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Points Allowed Avg. per Game</div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">$yourTmScoreTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$yourTmScoreAvg</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$otherTmScoreTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$otherTmScoreAvg</div></font></td> </tr> </table> </p><br /> <table width="85%" border="0" align="center"> <tr> <td width="50%" align="center"> <p> <table width="300" border="1" bgcolor="navy"> <tr> <td colspan="2" bgcolor="white"><b><font size="4" color="navy"><div align="center">GAME LOCATIONS</div></font></b></td> </tr> <tr> <td width="50%"><div align="center"><font size="3" color="white">Home:</font></div></td> <td width="50%"><div align="center"><font size="3" color="white">Away:</font></div></td> </tr> <tr> <td width="50%"><div align="center"><font size="3" color="white">$homeCounter</font></div></td> <td width="50%"><div align="center"><font size="3" color="white">$awayCounter</font></div></td> </tr> </table> </p> </td> <td width="50%" align="center"> <p> <table width="300" border="1" bgcolor="navy"> <tr> <td colspan="3" bgcolor="white"><font size="4" color="navy"><div align="center"><b>WINS & LOSSES</b></div></font></td> </tr> <tr> <td width="33%"><div align="center"><font size="3" color="white">Wins</font></td> <td width="33%"><div align="center"><font size="3" color="white">Losses</font></td> <td width="33%"><div align="center"><font size="3" color="white">Ties</font></td> </tr> <tr> <td width="33%"><div align="center"><font size="3" color="white">$wins</font></td> <td width="33%"><div align="center"><font size="3" color="white">$losses</font></td> <td width="33%"><div align="center"><font size="3" color="white">$tieGames</font></td> </tr> </table> </p> </td> </tr> </table><br /> <p> <table width="750" border="1" bgcolor="navy" align="center"> <tr> <td colspan="4"bgcolor="white"><font size="4" color="navy"><div align="center"><b>TOUCHDOWNS</b></div></font></td> </tr> <tr><td colspan="2"><font size="3" color="white"><div align="center"><b>TD's MADE</b></div></font></td><td colspan="2"><font size="3" color="white"><div align="center"><b>TD's ALLOWED</b></div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">Total Touchdowns</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">TD's Avg. per Game</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Total Touchdowns Allowed</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">TD's Allowed Avg. per Game</div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">$tdsTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$tdsAvg</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$tdsAllowedTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$tdsAllowedAvg</div></font></td> </tr> </table> </p><br /> <p> <table width="750" border="1" bgcolor="navy" align="center"> <tr> <td colspan="4" bgcolor="white"><font size="4" color="navy"><div align="center"><b>OFFENSIVE PERFORMANCE</b></div></font></td> </tr> <tr><td colspan="2"><font size="3" color="white"><div align="center"><b>RUSHING YARDS</b></div></font></td><td colspan="2"><font size="3" color="white"><div align="center"><b>PASSING YARDS</b></div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">Total Rushing Yards</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Rushing Yards Avg. per Game</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Total Passing Yards</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Passing Yards Avg. per Game</div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">$rushYrdTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$rushYrdAvg</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$passYrdTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$passYrdAvg</div></font></td> </tr> </table> </p><br /> <p> <table width="750" border="1" bgcolor="navy" align="center"> <tr> <td colspan="4" bgcolor="white"><font size="4" color="navy"><div align="center"><b>SACKS</b></div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">Total Sacks Made</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Sacks Made Avg. per Game</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Total Sacks Allowed</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Sacks Allowed Avg. per Game</div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">$sacksTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$sacksPerGameAvg</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$sacksAllowedTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$sacksAllowedAvg</div></font></td> </tr> </table> </p><br /> <p> <table width="750" border="1" bgcolor="navy" align="center"> <tr> <td colspan="4" bgcolor="white"><font size="4" color="navy"><div align="center"><b>TURNOVERS</b></div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">Total Turnovers Made</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Turnovers Avg. per Game</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Total Turnovers Allowed</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">Turnovers Allowed Avg. per Game</div></font></td> </tr> <tr> <td width="25%"><font size="3" color="white"><div align="center">$turnovForcedTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$turnovForcedAvg</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$turnovAllowedTotal</div></font></td> <td width="25%"><font size="3" color="white"><div align="center">$turnovAllowedAvg</div></font></td> </tr> </table> </p><br /> <p><font size="5" face="Arial Black"><a href="" onclick="self.close();">Close Window</a><br /><br /> <a href="C:\Inetpub\wwwroot\public_html\Perl Semester Project\nflStats.html">Enter more stats</a></font></p> </font> </body></html> endHtml } close INFILE; ######################### end while loop #########################
-I can't truly run it at home to know for sure.
•
•
Join Date: Sep 2007
Posts: 176
Reputation:
Solved Threads: 20
Perl Syntax (Toggle Plain Text)
#!C:/Perl/bin/perl.exe #Football Stats print "Content-type: text/html\n\n"; use CGI qw(:standard); use strict; use SDBM_File; use Fcntl;
8X---------snip
tons of code deleted
8X---------snip
First thing I would suggest you do is start using 'warnings'. That may point out a lot of syntax errors for you.
use warnings;
•
•
•
•
-I can't truly run it at home to know for sure.
Amer Neely - Web Mechanic
"Others make web sites. We make web sites work!"
"Others make web sites. We make web sites work!"
![]() |
Other Threads in the Perl Forum
- Previous Thread: File utilization
- Next Thread: How to print to file
| Thread Tools | Search this Thread |





