| Customers | ';
my $col1 = "ffffff";
my $col2 = "dddddd";
my $col = $col1;
foreach my $customer ( @customers ) {
my $td = qq! | !;
my $a = qq!';
$OUT .=
''.
"$td{'statuscolor'}. '">'.
ucfirst($customer->{'status'}). "". "$td".
"$td$a". $customer->{'name'}. "".
' ';
#"$td | ".
$col = $col eq $col1 ? $col2 : $col1;
}
$OUT .= '
|---|