in reply to Search and replace query
foreach my $line ( @fileArr ) { next if $line =~ m/<bindname>abcde<\/bindname><bindpass>welcom +e<\/bindpass> $line =~ s/<bindpass>welcome<\/bindpass>/<bindpass>Welcome1<\/ +bindpass/ } [download]