$html =~ s!(<a href="\s*)([^"]+)(\s*")!${1}foo$2$3!g;