print STDOUT "<FONT COLOR=\"red\"> $data </FONT><P>";

##</code><code>##

print STDOUT qq(<FONT COLOR="red"> $data </FONT><P>);

##</code><code>##

print STDOUT "<span style='color:red;'> $data <span>";