my $stripped = $salutation =~ s/(\(.*?\))// ? $1 : '';