¿Cómo puedo comparar diferentes elementos de matriz en Perl?
Soy nuevo en este campo. Así que amablemente vaya fácil en mí. Tengo dos matrices:
@array1 = ("ABC321", "CDB672", "PLE89",....);
@array2 = ("PLE89", "ABC678", "LMD789",...);
Quiero comparar los elementos de estas dos matrices diferentes. Pero, solo quiero unir letras con letras. Así, por ejemplo, si se comparan matrices,$array[2]
El elemento (PLE) debe coincidir con$array2[0]
(PLE) y similarmente$array1[0]
(ABC) debe coincidir con$array[1]
(A B C). Puedo hacerlo uno a la vez pero no puedo comparar todos los elementos de ambos arreglos al mismo tiempo (es decir, hacer un bucle de los arreglos).
my ($value1)= ($array[2]=~ /([A-Z]+)[0-9]+/);
print "Value1: $value1 \n";
my ($value2)= ($array[0]=~ /([A-Z]+)[0-9]+/);
print "Value2 : $value2 \n";
if ($value1 eq $value2){
print " length \n";
}
¿Alguna sugerencia sobre cómo configurar el bucle para ambas matrices al mismo tiempo?