Notepad ++ Cadeia alternativa em Perl Regex

Question

Estou tentando implementar algumas das minhas antigas pesquisas notepad + + regex em perl.

Eu uso o seguinte comando.

perl -i -pe 'BEGIN{undef $/;} s/\cellx10464\pard\plain\intbl\s0\ql\fi0\li0\ri0\sl320\plain\f4\fs20\b\cf0 Patent Information\b0(?:.*[\r\n]+){88}\cellx10464\pard\plain\intbl\s0\ql\fi0\li0\ri0\sl320\plain\f1\fs20\cf0 \f1\fs20\cf0 US \d{11}(?:.*[\r\n]+){52}\cellx10464\pard\plain\intbl\s0\ql\fi0\li0\ri0\sl320\plain\f1\fs20\cf0 \f1\fs20\cf0 (US [0-9]{5,7})[\r\n]+\cell\pard\plain\intbl\s0\ql\fi0\li0\ri0\sl320\plain\f1\fs20\cf0 \f1\fs20\cf0 (\w\d)[\r\n]+\cell\pard\plain\intbl\s0\ql\fi0\li0\ri0\sl320\plain\f1\fs20\cf0 [a-zA-Z]{3} [0-9,]{3} [0-9]{4}[\r\n]+\cell\pard\plain\intbl\s0\ql\fi0\li0\ri0\sl320\plain\f1\fs20\cf0 \f1\fs20\cf0  [\r\n]+\cell\pard\plain\intbl\s0\ql\fi0\li0\ri0\plain/tttttt$1 $2/smg' 1.rtf

Editar mas está dando erro (depois de mudar de sugestões)

Can't find string terminator "'" anywhere before EOF at -e line 1.

Este é meu primeiro encontro com o perl. O que estou perdendo (ou adicionando)?

Usando o morango perl para janelas.

    

Answer 1

Apologia pelo problema. Isso já tem resposta aqui link

uso de "em vez de" no Windows.