Foro - Perl en Español

Hola, amigos. Soy nuevo en Perl y en el foro. Mi problema es que quiero sacar datos de un array y guardarlos en una variable y viceversa, pasarlos de una variable a un array. Si pudieran darme una luz se los agradecería. Un saludo, bytes.

Bienvenido a los foros de Perl en Español, ReNcOoR.

Tu pregunta la tienes respondida en el primer Tutorial del sitio: Perl Básico - Parte 1.

Gracias, compañero, por la respuesta. Un saludo.

Ahora tengo otro problema: quisiera saber cómo hago para meter en un array una lista de cosas por medio del teclado; o sea...

my $var_ = <STDIN>

Que todo lo que yo meta por medio del teclado vaya a parar al array y posteriormente imprima en pantalla la lista del array, porque lo he intentado, pero me tira la lista de esta forma:

123456789101112131415161718192021222324252627282930
31323334353637383940

y yo quiero que me la tire de esta forma:

1
2
3
4
5
6
7
8
9
10

Espero sus comentarios. Un saludo.

Para lo primero, puedes hacer un bucle for() de 1 a 10 (por ejemplo), y dentro de él, solicitarle al usuario el número, con <> (o con <STDIN>, que será lo mismo), y luego lo guardas con push() en la variable arreglo.

Recuerda que estarás guardando cada número con el carácter fin de línea que el usuario manda a la hora de introducir datos por el teclado. No sé si los querrás guardar o no. Si no, usa chomp().

Después, a la hora de sacarlos en pantalla, puedes hacer un join("\n", @arreglo) para sacar todos los números separados por un carácter fin de línea, con lo que saldrán separados por líneas. Eso sí: si guardaste los números con su carácter de fin de línea, saldrán doblemente separados. Como los números ya lo tienen, entonces no necesitas ponerlo con el join() por lo que le pedirás que te los saque todos juntos, y listo: join("", @arreglo).

Muchas gracias, compañero explorer, por su explicación. Más claro no canta un gallo. Un saludo.