Foro - Perl en Español

Hola a todos.

Quería preguntar si se os ocurre alguna forma "sencilla" para complementar cadenas (strings).

Me explico. Imaginemos que tenemos dos variables $A y $B: $A = (AA,BB,CC,RICAR), $B = (X,33,,RICAR) y quiero obtener el siguiente resultado: (AAX,BB33,CC,RICAR).

Con esto quiero decir que determinados campos quiero que se complementen y otros no.

Saludos,
Ricar.

¿Y qué reglas hay que aplicar a cada caso?

Hola, explorer.

Pues, por ejemplo, que complemente el primer campo de las variables $A y $B y tercer campo de las mismas variables. Un campo se delimita por ",".

Yo creo que voy a hacerlo con split(). Aprovecho y lanzo otra pregunta: ¿se puede hacer un split() directo?, quiero decir, si quisiera coger el tercer campo directamente y teniendo en cuenta que la "," es el único valor seguro, ¿podría indicarle al split() que escoja lo que hay en la 3ª coma, por ejemplo? (¿me he explicado?)

Saludos,
Ricar.

ricar escribiste:Pues, por ejemplo, que complemente el primer campo de las variables $A y $B y tercer campo de las mismas variables. Un campo se delimita por ",".

ricar escribiste:¿se puede hacer un split() directo?, quiero decir, si quisiera coger el tercer campo directamente y teniendo en cuenta que la "," es el único valor seguro, ¿podría indicarle al split() que escoja lo que hay en la 3ª coma, por ejemplo? (¿me he explicado?)

No, split() no tiene esa posibilidad... pero ¡esto es Perl! así que es posible hacerlo:


Explicación: split() devuelve una lista de valores con todos los campos partidos. Esa lista está "rodeada" por unos paréntesis, para "agruparlos". Y ya que tenemos una lista "de algo", podemos extraer su tercer elemento igual a como si fuese un array del que sacamos su tercer valor.