$instream =~ s/<FONT(.*?)\sCOLOR\s?=\s?('|")?(\#......)\2(.*?)\sSIZE\s?=\s?(\d+)(.+?)FACE\s?=\s?('|")?([^\7]+)\7[^>]*>/genStyleCSF($3,$5,$8)/iegs;
$instream =~ s/<FONT(.*?)\sCOLOR\s?=\s?('|")?(\#......)\2(.*?)\sSIZE\s?=\s?(\d+)[^>]*>\s*/genStyleCS($3,$6)/iegs;
$instream =~ s/<FONT(.*?)\sCOLOR\s?=\s?('|")?(\#......)\2(.+?)FACE\s?=\s?('|")?([^\5]+)\5[^>]*>\s*/genStyleCF($3,$6)/iegs;
$instream =~ s/<FONT(.*?)\sCOLOR\s?=\s?('|")?(\#......)\2[^>]*>\s*/genStyleC($3)/iegs;
$instream =~ s/<FONT(.*?)\sSIZE\s?=\s?(\d+)(.+?)FACE\s?=\s?('|")?([^\4]+)\4[^>]*>\s*/genStyleSF($2,$4)/iegs;
$instream =~ s/<FONT(.*?)\sSIZE\s?=\s?(\d+)[^>]*>\s*/genStyleS($2)/iegs;
$instream =~ s/<FONT(.+?)FACE\s?=\s?('|")?([^\2]+)\2[^>]*>\s*/genStyleF($3)/iegs;