Tr (td({-align=>'right'},["<FONT ".($state==2?"COLOR=FF0000":undef).">First Name</FONT>"]),td({-align=>'left'},[ textfield(-name=>'user_firstname' ,-default=>$userinfo[0])])),

##</code><code>##

Tr (td({-align=>'right'},["<FONT ".(val_sub($userinfo[0])==2?"COLOR=FF0000":undef).">First Name</FONT>"]),td({-align=>'left'},[ textfield(-name=>'user_firstname' ,-default=>$userinfo[0])])),