使用sed从字符串中删除括号

Question

I am trying to use sed (1) to remove parentheses from strings, but only when the parentheses begin with a particular string. For example, I want to change a string such as Song Name (f/ featured artist) (Remix) , to Song Name f/ featuredartist (Remix) . How can I achieve this?

I am currently trying the following:

echo "Song Name (f/ featuredartist) (Remix)" | sed s/"(f\/ [a-z]*)"/"f\/ "/

But all this does is return Song Name f/ (Remix) .

Also note: Anything goes between f/ and ) , not just [az]* as my working attempt would imply.

Answer 1

This might work for you:

echo "Song Name (f/ featuredartist) (Remix)" | sed 's|(\(f/[^)]*\))|\1|'
Song Name f/ featuredartist (Remix)

Answer 2

echo 'Song Name (f/ featured artist) (Remix)' | sed 's/\(.*\)(\(f\/[^)]\+\))/\1\2/'

Answer 3

TXR solution ( http://www.nongnu.org/txr ).

@;; a texts is a collection of text pieces
@;; with no gaps in between.
@;;
@(define texts (out))@\
  @(coll :gap 0)@(textpiece out)@(end)@\
  @(cat out "")@\
@(end)
@;;
@;; recursion depth indicator
@;;
@(bind recur 0)
@;;
@;; a textpiece is a paren unit,
@;; or a sequence of chars other than parens.
@;; or, else, in the non-recursive case only,
@;; any character.
@;;
@(define textpiece (out))@\
   @(cases)@\
     @(paren out)@\
   @(or)@\
     @{out /[^()]+/}@\
   @(or)@\
     @(bind recur 0)@\
     @{out /./}@\
   @(end)@\
@(end)
@;;
@;; a paren unit consists
@;; of ( followed by a space-delimited token
@;; followed by some texts (in recursive mode)
@;; followed by a closing paren ).
@;; Based on what the word is, we transform
@;; the text.
@;;
@(define paren (out))@\
  @(local word inner level)@\
  @(bind level recur)@\
  @(local recur)@\
  @(bind recur @(+ level 1))@\
  (@word @(texts inner))@\
  @(cases)@\
    @(bind recur 1)@\
    @(bind word ("f/") ;; extend list here
           )@\
    @(bind out inner)@\
  @(or)@\
    @(bind out `(@word @inner)`)@\
  @(end)@\
@(end)
@;; scan standard input in freeform (as one big line)
@(freeform)
@(texts out)@trailjunk
@(output)
@out@trailjunk
@(end)

Sample run:

$ txr paren.txr -
a b c d
[Ctrl-D]
a b c d

$ txr paren.txr -
The quick brown (f/ ox jumped over the (f/ lazy) dogs). (
The quick brown ox jumped over the (f/ lazy) dogs. (