Thread 2 oder mehr arrays vergleichen (9 answers)
Opened by Gast at 2008-02-07 12:51

Gast Gast
 2008-02-07 17:12
#105687 #105687
moritz+2008-02-07 15:28:18--
Und gefällt dir Array::Diff nicht? das wäre vermutlich deutlich einfacher für dich.


soweit ich das verstanden habe, muss ich das "Algorithm::Diff"-Modul erst installieren...das ist aber an dem Rechner an dem ich sitze nicht möglich...

hier ist erstmal der meine Interpretation deines Vorschlages

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36

sub vergleichen
{
  my $x = 0;
  my $y = 0;
  my $vergl_index_1 = 0;
  my $vergl_index_2 = 0;
  while ($x<=$#datei_array)
  {
    while ($y<=$#{$datei_array[$x]})
    {
      my $zaehler_array_2 = $x+1;
      if ($datei_array[$x][$vergl_index_1] eq $datei_array[($x+1)][$vergl_index_2])
      {
        print "$vergl_index_1\n";
        push (@in_allen_arrays, $datei_array[$x][$vergl_index_1]);
        push (@in_allen_arrays, "\n");
        $vergl_index_1++;
        $vergl_index_2++;
      } 
      if ($datei_array[$x][$vergl_index_1] lt $datei_array[($x+1)][$vergl_index_2])
      {
        push (@nur_array_1, $datei_array[$x][$vergl_index_1]);
        push (@nur_array_1, "\n");
        $vergl_index_1++;
      }
      if ($datei_array[$x][$vergl_index_1] gt $datei_array[($x+1)][$vergl_index_2])
      {
        push (@nur_array_2, $datei_array[($x+1)][$vergl_index_2]);
        push (@nur_array_2, "\n");
        $vergl_index_2++;
      }
      $y++;
    }
    $x++;
  }
}


ich muss wohl noch dazu sagen das das "datei_array" bereits aus 2 (oder mehr,falls ich mehrere dateien vergleichen muss) arrays besteht...
deswegen sieht der kopf der funktion auch so wirr aus...oder ich stell mich einfach mal wieder nur zu dumm an:(

View full thread 2 oder mehr arrays vergleichen