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