Oi,

Estou escrevendo um Perl script que lê em muitas linhas, se uma linha satisfaz os critérios que pretende editar, é. Por exemplo, o script irá retornar o seguinte exemplo linha ... teste \u003d abc123

Tudo o que quero fazer é tira fora do "teste \u003d" e apenas ficar com o abc123. No meu script que pode facilmente voltar tudo antes de "\u003d", mas para a vida de mim eu não posso ficar tudo após o "\u003d". Um snipit do código é ...

$ Linha3 \u003d <FILE>;
$ Linha3 \u003d ~ s / ^ \ s + / /; # tiras off espaço
$ Linha3 \u003d ~ s /\u003d.*//; # retorna tudo antes de "\u003d"

Qualquer ajuda seria muito apreciada, obrigado.

print "$ Linha3 \ n";