print "Content-type: text/html\n\n";
use CGI;
...
print "<td width='40%' align='center'><font color='$color'>
    @contetnsoffile[$nk]</font></td>";
...