Частичное совпадение строк животных в R

С моей точки зрения, это должно работать:

echo preg_replace("/<(.*)>(.*)<\/(.*)>/i","<$1><span class=\"some-class\">$2</span></$3>",$target);

Но я не знаю, насколько это безопасно. Я просто представляю возможность:)