threads => Grundwissen - #73480 (Allgemeines zu Perl)

RPerl

2007-02-14 21:44

User since
2006-11-26
384 Artikel
BenutzerIn

user image

Ok - hab nun fast alles feritig.
Ich mache ganz am Schluss in Sub prepare folgendes:

Code (perl): (dl )

1
2

 my $thr1 = threads->create(\&abfrage, \@liste_1, $nick, $proxy, $host);
  my $thr2 = threads->create(\&abfrage, \@liste_2, $nick, $proxy, $host);

soweit alles ok.

in abfrage hab ich dann aber wieder das Prob.
Wie kann ich dem thr1 @liste_1 durchlaufen lassen mit einer for und liste_1[$i] und wie kann ich dem thr2 @liste_2 durchgehen lassen mit einer for schleife liste_2[$i]
Das alles muss in EINER Subfunktion(&abfrage) geschehen.
das ist das ganze Problem

// Edit:
Hab in &abfrage mal das:

Code (perl): (dl )

sub abfrage {
   my ($arref) = @_;
   for my $element(@$arref){
       print $element;
   }
}
}

das klappt auch... aber hat damit dann auch jeder der beiden threads eine andere liste?
Zum Test habe ich mal eine Liste angelegt:

Code: (dl )

123
adolf
hitler
wingston
churchill
stalin
grad
schule
scheisse
igor

Dann bekomme ich "123adolfhitlerwingstonchurchillstalin"
Und mehr nicht. Und was ist mit'm anderen thread?!\n\n