or download this
for $j (0 .. $#sorted)
{
print "<tr bgcolor=#888888><td>$sorted[$j][4]</td><td>$timecon</td><td
+>$sorted[$j][3]</td><td>$sorted[$j][6]</td><td>$sorted[$j][7].
</td><td>$sorted[$j][5].</td><td>$sorted[$j][8]</td><td>$sorted[$j][9]
+</td><td>$sorted[$j][11]</td><td>$sorted[$j][12].</td><td>$sor
ted[$j][14].</td><td>$sorted[$j][13]</td></tr>\n\n";
}