Ya, pero de todas formas lo tendría que hacer por 2 arrays ya que después en el bucle voy a usar las variables $nombre y $apellido en otras partes.
Entonces tendría que seguir usando el doble bucle, ¿no?
Saludos...
-
- Publicidad
Duda sobre doble bucle foreach
12 mensajes
• Página 2 de 2 • 1, 2
Publicidad
por explorer » 2008-10-15 13:16 @595
Recorrer dos array se puede hacer de muchas formas, pero la más clara es la que haces con el doble bucle. Y casi da igual el lenguaje informático que uses: una lista de valores solo puede ser escrutada por una sentencia de control de iteración.
Esta es otra forma de hacerlo:
pero bueno... el doble bucle es más visual.
Esta es otra forma de hacerlo:
Using perl Syntax Highlighting
#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
open (NOMBRES, 'nombres.txt');
my @nombres = <NOMBRES>;
chomp @nombres;
close(NOMBRES);
open (APELLIDOS, 'apellidos.txt');
my @apellidos = <APELLIDOS>;
chomp @apellidos;
close(APELLIDOS);
my @nombre_apellidos = map { my $n = $_; map { "$n $_\n" } @apellidos } @nombres;
print "@nombre_apellidos";
use strict;
use warnings;
use diagnostics;
open (NOMBRES, 'nombres.txt');
my @nombres = <NOMBRES>;
chomp @nombres;
close(NOMBRES);
open (APELLIDOS, 'apellidos.txt');
my @apellidos = <APELLIDOS>;
chomp @apellidos;
close(APELLIDOS);
my @nombre_apellidos = map { my $n = $_; map { "$n $_\n" } @apellidos } @nombres;
print "@nombre_apellidos";
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4
pero bueno... el doble bucle es más visual.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
-
explorer - Administrador
- Mensajes: 14486
- Registrado: 2005-07-24 18:12 @800
- Ubicación: Valladolid, España
12 mensajes
• Página 2 de 2 • 1, 2
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 3 invitados