Buenos días, expertos de Perl en Español, acudo nuevamente a ustedes debido a que tengo una complicación bastante compleja, la cual googleé, he incluso busqué en el foro, con resultados negativos.
Tengo una matriz de la siguiente manera.
my @vmatriz=qw(val1 val2 val3 val4);
Tengo un archivo de texto el cual paso a una variable matriz de la siguiente manera:
use strict;
use warnings;
my @a=glob("*.txt");
foreach$a(@a){
open(A, "$a");
my @L=<A>;
foreach(@L){
# aquí ...