if ( $string4 =~ />(?:([\s|\w]+))(?:<\/td>)/m ) { ... }