如何用正则截取字符串

Question

<td height="25" bgcolor="#F9F8F5" align="center"> <b>用户名</b> </td>
</tr>
<!--ques-->
<tr>
<td height="25">爱Love1314</a></td>
</tr>
如何使用正则截取"爱Love1314"这个字符串呢?

Answer 1

当然是Delphi了...
想使用TPerlRegEx正则表达式截取"爱Love1314"字符串.
但不知道RegEx怎么写...

Answer 2

  with TPerlRegEx.Create do
    try
      Options := [preSingleLine];
      Subject := Memo1.Text;
      RegEx := '".*>(.*?)</a>';
      if Match then
        ShowMessage(Groups[1]);
    finally
      Free
    end;