The best way to get "red," etc. is with a CSS stylesheet. Let the Perl script output the data without regard to how it looks, but adding "class=" if necessary.