Foro - Perl en Español

Publicado: **2016-09-25 22:05 @962**

Yo solía hacer matrices en C pero ahora en Perl veo que es algo diferente.

¿Cómo se puede hacer una matriz en la que el usuario ingrese el valor en cada posición?

Publicado: **2016-09-25 23:09 @006**

En Perl se hace de la misma manera: listas de listas de elementos.

my @matriz;

$matriz[0] = [ 1, 2, 3, ];

$matriz[1][2] = 42;

Más información en tu propio ordenador en perldoc perllol, y en la Web (traducido al español).

Publicado: **2016-09-26 14:25 @642**

Al momento de imprimir una matriz de 5x5 me sale una línea hacia abajo con los valores, como si fuera solo una dimensión.

El código es:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

my @matriz;
 
for ( $i = 1; $i <= 5; ++$i ) {
    for ( $j = 1; $j <= 5; ++$j ) {
        print "Ingrese el valor de la posición: [$i,$j]->";
        $matriz[$i][$j] = <STDIN>;
    }
}
 
for ( $i = 1; $i <= 5; ++$i ) {
    for ( $j = 1; $j <= 5; ++$j ) {
        print "\t$matriz[$i][$j]";
        print "\n";
    }
}
<>;
 
Coloreado en 0.003 segundos,  usando GeSHi 1.0.8.4

Publicado: **2016-09-26 15:22 @682**

Es porque estás almacenando los valores junto con el carácter de fin de línea (al pulsar la tecla Enter, en el <STDIN>).

La solución es quitar esos caracteres:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

        chomp($matriz[$i][$j] = <STDIN>);
Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Y luego, a la hora de imprimir, hay que poner el "\n" al final de cada línea de la matriz, así que tienes que mover la línea 13 por debajo de la 14 (final del bucle for() entre 11 y 14).

Quedaría un poco más corto así:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

my @matriz;
 
for my $i (1 .. 5 ) {
for my $j (1 .. 5 ) {
        print "Ingrese el valor de la posición: [$i,$j]->";
        chomp($matriz[$i][$j] = <STDIN>);
    }
}
 
for my $i (1 .. 5 ) {
for my $j (1 .. 5 ) {
        print "\t$matriz[$i][$j]";
    }
    print "\n";
}
<>;
Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Publicado: **2017-02-27 16:32 @731**

Alguna vez me hice un videillo, creo que se puede mejorar, pero en esa época era con fines ilustrativos.

Puedes revisarlo:

Foro - Perl en Español

Matriz

Matriz

Re: Matriz

Re: Matriz

Re: Matriz

Re: Matriz