Hi, Sorry about that, nonetheless, this code also will do the trick you want :-)

$x =~ s/<td>.*<td>(.*?)3(.*?)<\/td>.*<\/td>/<td>$13$2<\/td>/;
[download]