[Perl] zwei Array nach Ihnhalte vergleichen

[Maxcoke]

Ich muss zwei Array nach Inhalte vergleichen.

Im ersten Array stehen Dateinamen, die ich aus einer Datei einlese.
Im zweiten Array stehen Dateinamen, die nicht weiter verarbeitet werden dürfen.

Es sieht so aus, das ich die Dateinamen aus dem ersten Array, von einer Datei einlese und die dann in einer HTML-Datei in einer Tabelle wieder ausgebe.

Ich habe aber bestimmte Dateinamen, die ich nicht ausgeben möchte. Wie fange ich die ab.

[hwei]

versuche das mal


foreach $suchen (0..$#array1)
{
foreach $vergleichen (0..$#array2)
{
if ( $array1[$suchen]->[0] ne $array2[$vergleichen]->[0] &&
$array1[$suchen]->[1] eq $array2[$vergleichen]->[1] )
{
$tmp2 = "$array1[$suchen]->[0]|
$array2[$vergleichen]->[0]|
$alle_listen[$suchen]->[1]";

print "\n@tmp2";
}
}
}