Foreach print question 1

[ability1]

I'm trying to print the results from an array

Lets use this as an example

@p_categories = (info1,info2,info3,info4,info5)

foreach $p_category (@p_categories){
print &quot;<tr><td> $p_category </td></tr>&quot;;

}

Now it's easy to have rows <tr> to simply run to infinity, but how would you write, to put the first say 3 results on the first <tr> and once the results hit above 3 for that line to start a new <tr> bracket....if you catch my drift.

 

[raklet]

This does the trick:

@p_categories = (info1,info2,info3,info4,info5,info6,info7,info8,info9,info10);
$i=0;
foreach $p_category (@p_categories) {
if ($i==0) {
print &quot;<tr>&quot;;
}
if ($i >= 0 && $i <= 2) {
print &quot;<td>$p_category</td>&quot;;
}
if ($i == 2) {
print &quot;</tr>\n&quot;;
}
$i++;
if ($i == 3) {
$i = 0;
}
}
print &quot;</tr>\n&quot;

 

[ability1]

Works perfect! Awesome job thanks for the help it is much appreciated