Я конечно не видел входные данные, но у вас какое-то извращение +)

max_rip 20.01.2014 17:51 / 20.01.2014 18:02

$tTemp[^sText.match[(\w+)?\s+<tag>(.+)&nbsp^;</tag>][gim]]
	^if(def $tTemp){
		$sResult[^tTemp.menu{^if(def $tTemp.1){[$tTemp.1] }$tTemp.2}[, ]]
	}

Так будет все более наглядно, вопрос только будет в наборе символов, для первой группы.

add Просто не используйте жадный поиск и будет вам счастье.

---