I either need more room, or have to write less :) I continue..

You write a lot of things like:

$fontc ="<FONT COLOR=\"$color\">";

When you could use qq{} and not have to escape.

$fontc = qq{<FONT COLOR="$color">};

You may want to look into using here docs when printing multiple lines, and look at CGI.pm's methods for displaying HTML.

Just some observations and hints to help you along the Path of Perldom.

Cheers,
KM