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