自分用の覚書として､

$memoにNOBR､CODE､B､PRE､FONTのﾀｸﾞあった場合にこれを途中で切り出して終了ﾀｸﾞが削除されている時に追加する場合のｻﾝﾌﾟﾙ｡

ex:<font ="color:#121212"><b>あｰだこｰだと書いてみる</b>
→<font ="color:#121212"><b>あｰだこｰだと書いてみる</b></font>


if($memo =~ /(<(NOBRCODEBPREFONT)\b(?:(?!<\/\2>).)*(?:<\2>$))/sigx) {$memo.="</$2>";}

http://www.din.or.jp/~ohzaki/regex.htm#NoEndTag
を参考にしています｡