$value =~ s{(href=')([^']*)(')}{$1.join('',split/<br>/,$2).$3}gsie;