Comparar dos arrays

[Statyk]

Buenas,

¿Cómo podría comprobar que dos arrays son iguales? He probado con lo siguiente, pero no funciona:

my @array1 = ("1", "2");
my @array2 = ("2", "3");

if(@array1 eq @array2) {
print "Arrays iguales\n";
}

else {
print "Arrays distintos\n";
}

Podría ir comparando elemento a elemento, pero seguro que en Perl existe una forma mas facil

Por otra parte, puede que los elementos del array esten desornados, ¿Como podría ordenarlos? Alfabéticamente por ejemplo..

MUCHAS GRACIAS!!

[monoswim]

Holoa, sipongamos que tenemos 2 arrays iguales pero desordenados, entonces el primer paso sería ordenarlos

@ordenado1 = sort @uno;
@ordenado2 = soft @dos;

Ahora hacemos un bucle que compare cada item de los arrays

Código:

$i = 0;
$elem = @ordenado1;
for ($i = 0; $i < $elem;$i++){
   if ($ordenado1[$i] == $ordenado2[$i]){
       print "El elemento $i son iguales en ambos arrays";
   } else {
       print "El elemento $i NO son iguales en ambos arrays";
   }
}

Se entiende ? con $elem = @ordenado1; tomamos la longitud del array para hacer una iteración y que valla complobando así todos los elelemntod de ambos arrays...Que ya están ordenados...

Espero que te sirva

Saludos