This is an slice from an other wise successful script.
What i need it to do is print one <tr> then print <td>$stat_array</td> fours times, quit print a </tr> then print another <tr> , prints the next four $stat_arrays in @stat_array, and so on and then a </table>.
What it does is print all eight $start_arrays then a </tr>
Code:
my @table_header = ("Process", "Region_Permission","Region Violation","Message Type");
my @stat_array =("ibfarm102 - localtick" ," Greenwich" ," hibmis100 - procHKHD2 - Hongkong" , "PidMonRsp" ," ibfarm102 - localtick", "Greenwich" ,"hibmis100 - procHKHD2 - Hongkong", "PidMonReq" print MAIL "<tr>\n";
for ( $i =0 ; $i <$#table_header ; $i = $i + $#table_header){
foreach my $stat_array(@stat_array) {
print MAIL "<td>$stat_array</td>\n";
}
print MAIL "</tr>\n";
}
print MAIL "</table>\n";
print MAIL "<br><br>\n";
print MAIL "</table></center></body></html>";
close MAIL;
what i get:
Code:
<tr>
<td>ibfarm102 - localtick </td>
<td> Greenwich</td>
<td> hibmis100 - procHKHD2 - Hongkong </td>
<td>PidMonRsp</td>
<td>ibfarm102 - localtick </td>
<td> Greenwich</td>
<td> hibmis100 - procHKHD2 - Hongkong </td>
<td>PidMonReq</td>
</tr>
</table>
<br><br>
</table></center></body></html>
______________
I need the table to look like :
Code:
<tr>
<td>ibfarm102 - localtick </td>
<td> Greenwich</td>
<td> hibmis100 - procHKHD2 - Hongkong </td>
<td>PidMonRsp</td>
</tr>
<tr>
<td>ibfarm102 - localtick </td>
<td> Greenwich</td>
<td> hibmis100 - procHKHD2 - Hongkong </td>
<td>PidMonReq</td>
</tr>