Sed or perl Delete outer parentheses only if the first inner word matches

Question

Sed or perl Delete outer parentheses only if the first inner word matches

Using GNU sed, I need to remove paste phrases like (click here ....), including parens. The text following click herechanges, but I need to remove all the outer parentheses.

I tried many options on the following, but I can't seem right:

sed -e 's/\((click here.*[^)]*\)//'

EDIT Stupidly, I did not notice that in the middle of the line in parentheses a line often appears, so sedit probably won't work. Example:

(click here to
enter some text)

+3

bash regex perl sed

Michael berkowski May 27 '11 at 16:40

source share

3 answers

, , - :

sed -e 's/(click here [^)]*)//'

+3

sidyll 27 '11 16:52

Here's another approach sedthat stores full input in a hold buffer:

# see http://austinmatzko.com/2008/04/26/sed-multi-line-search-and-replace/
echo '
()
(do not delete this)
()
(click here to
enter some text)
()
' | 
sed -n '1h;1!H;${;g;s/(\([^)]*\))/\1/g;p;}'

+1

alumnat May 30 '11 at 9:32

source share

Toto · Accepted Answer · 2011-05-27T17:52:27+0000

With perl, you can run:

perl -00 -pe "s/\(click here [^)]*\)//g" inputfile > outputfile

, (click here anychar but '(' ), .

Sed or perl Delete outer parentheses only if the first inner word matches

More articles: