my $match = "\\well";
$text =~ s/$match//;