Usando um regex compatível com Perl com GNU grep -P

Question

Estou usando esse regex (?<=\[')[^,]*em um arquivo que contém a seguinte linhadisk = ['OVS/sdasd/asdasd/asdasd/something.img, w']

Eu quero que isso volteOVS/sdasd/asdasd/asdasd/something.img

Como uso greppara fazer funcionar?

Eu tentei, grep -P "(?<=\[')[^,]*"mas ele retorna a linha inteira.

Answer 1

Adicione a -oopção para grepretornar apenas o que corresponde ao padrão que você está procurando:

$ grep -Po "(?<=\[')[^,]*" data.txt 
OVS/sdasd/asdasd/asdasd/something.img

Answer 2

Você também pode usar sedsem a asserção lookaround para maior portabilidade ( -opode não estar disponível para você grep):

sed "s!['\(\[^,\]*\),.*\$!\1!;t;d;p" data.txt

Observe o uso "estranho" de escapes de barra invertida aqui. Isso se deve ao fato de sedusar BREs por padrão (veressa questão).

Falando em portabilidade, por que não usar Perl?

perl -nle "print \$1 if /\['([^,]*)/" data.txt

Answer 3

@slm já deu a resposta canônica. Aqui estão mais algumas opções:

Use awke 'como delimitador de campo (assumindo que todas as linhas tenham o mesmo formato):

$ awk -F "'" '($1~/ = /){print $2}'
OVS/sdasd/asdasd/asdasd/something.img, w    

Faça tudo em perl:

$ perl -lne 'print $1 if /\[.(.*?).\]/' data.txt 
OVS/sdasd/asdasd/asdasd/something.img, w    

Use um regex mais simples e analise os resultados:

$ grep "\[.*\]" data.txt | awk -F "'" '{print $2}'
OVS/sdasd/asdasd/asdasd/something.img, w
$ grep -o "\[.*\]" data.txt | perl -pe "s/[\[\]']//g"
OVS/sdasd/asdasd/asdasd/something.img, w
$ grep "\[.*\]" data.txt | sed 's/.*\[.\(.*\).\]/\1/'
OVS/sdasd/asdasd/asdasd/something.img, w
$ grep "\[.*\]" data.txt | perl -pne 's/.*\[.(.*?).\].*/$1/'
OVS/sdasd/asdasd/asdasd/something.img, w
$ grep "\[.*\]" data.txt | perl -lne 'print $1 if /\[.(.*?).\]/'
OVS/sdasd/asdasd/asdasd/something.img, w