#untested...
  my @colors = ('#cccccc', '#ffffff', 'lightgreen');
  my $index = 0;
  foreach( @rows ) {
     my $bgcolor = $colors[ $index % @colors ];
     print qq{<tr style="background-color: $bgcolor;">};
     # etc...
     print qq{</tr>};

     $index++;
  }