page... always nice to know. Perhaps one day I shall have to change this
so it doesn't display the whole lot!
print '<html><body><table border="1">';
print '<html><body><table border="1">';
open(FILE, "<download_log");
while($line = <FILE>) {
@row = split(/\|/, $line);
open(FILE, "<download_log");
while($line = <FILE>) {
@row = split(/\|/, $line);
<td>$row[5]</td>
</tr>
EOT
<td>$row[5]</td>
</tr>
EOT
-print "</table></body></html>";
\ No newline at end of file
+print "</table>Download count: $download_count</body></html>";
\ No newline at end of file