| 
Sziasztok!
Elakadtam ennel a temanal:
Csimalok egy tobbdimenzios tombot:
#ez itt nem lenyeg, csak egy ciklus, ami erteket ad a @rec-nek
for (my $i=0;$i<$end;$i++)
 {
  @rec = $database->get_record;
 if (  ($rec[9] eq "new")||($rec[9] eq "act"))
  {
#a @lista lenne a tomb, amibe raknam a @rec tombot, imigyen:
  @rec=split;
  push  ]);
#innentol megint nem lenyeg
  }
 $database->go_next;
 }
#itt megnezem a tombelemek szamat:
$hossz= @lista;
print "\$hossz=$hossz"; 
#annyi, amennyinek kellene lennie
#itt olvasnam vissza:
 for $sor  ) 
  {
  print "$sor<br>";
  }
Viszont csak egy rakas Array..-t kapok eredmenyul.
Az egesz a MacMillan Perl konyv alapjan keszult, de meglehetosen szuxavu
ebben a temaban, es mashol sem talaltam ra a megoldasra.
Tud valaki segiteni?
egy CC-t kulon +koszonnek.
Udv:
Bicsi |