my $string ='<vertical name="Businesses" combination="and">
		<Busines name="Content">
  			<description> Replicant consists of Icon, Title1, Title2, Description, MOre Title, and More Hyperlink (minimum=0, maximum=10) </description>
		   	<BusinessNames min-entity="1" max-entity="10">';
		   	
my $strRepl ='<Bnames name="Businesses" min-entity="1" max-entity="10">';

$string =~ m/<BusinessNames (.*)?>/;

my $str2Brepl = $`;

$string =~ s/$str2Brepl/$strRepl/mi;

print "$string";