From a3050e73210211d1b2e24ae594a04009615d145d Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Thu, 27 Aug 2009 14:31:49 +0000
Subject: [PATCH] added zebra stripes

---
 lib/PXElator/html.pm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/lib/PXElator/html.pm b/lib/PXElator/html.pm
index 06b4752..64f55fb 100644
--- a/lib/PXElator/html.pm
+++ b/lib/PXElator/html.pm
@@ -14,9 +14,14 @@ sub table {
 
 	my @td = map { "<td>$_</td>" } @_;
 	my $html = qq{<table>\n<tr>$th};
+	my $row = 0;
+
 	foreach ( 0 .. $#td ) {
 			$html .= $td[$_];
-			$html .= qq{</tr>\n<tr>} if ( $_ + 1 ) % $cols == 0;
+			if ( ( $_ + 1 ) % $cols == 0 ) {
+				$zebra = $row++ % 2 == 0 ? qq{ style="background: #eee"} : '';
+				$html .= qq{</tr>\n<tr$zebra>};
+			};
 	}
 	$html .= qq{</tr>\n</table>};
 }
-- 
2.20.1