[Cascavel-pm] Back to RE

[Daniel Ruoso]

Em Qui, 2004-06-24 às 19:36, vivan em dim.fm.usp.br escreveu:
> Bem... Enfim... Aproveitando a duvida do nosso dignissimo colega. Eu tive
> que fazer algumas configuracoes usando MML num SGSN. Como teria que ficar
> digitando muito, resolvi usar o Perl ;)

que diabos é MML e SGSN?

> As ER que usei deram certo, solucionaram o problema, mas ficaram meio
> feionas... Me parece q tem como abreviar as ER (com \1 \2 e coisas do
> tipo). Queria q vcs me dessem um help nisso, jah nao consegui dominar o
> assunto por enquanto.

Vai ficar mais fácil se você mandar as strings de origem e de destino...

> Ae vao elas. Comecando com uma mais simples:
> /(\d+)\s(\w+)\s+(\w{3})\s+(\d+)\s+(\d+)\s+(\d+)(\-\d+)*\s+(\w+)\-(\d+)/
> E agora, uma um pouquinho mais complicada:
> /(\d+).+SUB(\d+)\s+(\w+).+\s+\w{2}\-\w{2}\s+(\d+)\s+\w{2}\-\w{2}\s+(\d+)\s+(\d+)\s+(\w)\s+(\d+).+SUB(\d+)\s+(\w+).+\s+\w{2}\-\w{2}\s+(\d+)\s+\w{2}\-\w{2}\s+(\d+)\s+(\d+)\s+(\w)\s+(\d+)/
> Bem... Existem varias repeticoes. Acho q dah pra enxugar legal. Por favor,
> me deem um help de como fazer isso.

fazer um while naquilo que se repete resolve as repetições...