$message =~ s~\[size=(.+?)\](.+?)\[/size\]~"<font size=\"".(($1 > 10) ? 10 : $1)."\">$2</font>"~eisg;