Help for this page
Tr (td({-align=>'right'},["<FONT ".($state==2?"COLOR=FF0000":undef)."> +First Name</FONT>"]),td({-align=>'left'},[ textfield(-name=>'user_fir +stname' ,-default=>$userinfo[0])])),
Tr (td({-align=>'right'},["<FONT ".(val_sub($userinfo[0])==2?"COLOR=FF +0000":undef).">First Name</FONT>"]),td({-align=>'left'},[ textfield(- +name=>'user_firstname' ,-default=>$userinfo[0])])),