--- lib/PXElator/html.pm 2009/08/09 22:05:09 188
+++ lib/PXElator/html.pm 2009/08/27 14:31:49 307
@@ -14,9 +14,14 @@
my @td = map { "
$_ | " } @_;
my $html = qq{\n$th};
+ my $row = 0;
+
foreach ( 0 .. $#td ) {
$html .= $td[$_];
- $html .= qq{
\n} if ( $_ + 1 ) % $cols == 0;
+ if ( ( $_ + 1 ) % $cols == 0 ) {
+ $zebra = $row++ % 2 == 0 ? qq{ style="background: #eee"} : '';
+ $html .= qq{
\n};
+ };
}
$html .= qq{
\n
};
}