my ($c1, $c2) = random_color();
                $msg .= $cgi->table({-border => 1, bgcolor => $c1, style => "Color: $c2;"}, $cgi->Tr($table_data));