Thread In einem Perl Script 2 IP-Adressen
(10 answers)
Opened by NeWsOfTzzz at 2009-07-26 17:15
ich mache so was lieber so:
Code (perl): (dl
)
1 2 3 4 5 6 7 my @ips = ('xxx.xx.xx.xx', 'xxx.xx.xx.xx', 'xxx.xx.xx.xx', 'xxx.xx.xx.xx'); sub callBeforeRequest { @LWP::Protocol::http::EXTRA_SOCK_OPTS = ( LocalAddr => $ips[0] ); push(@ips,shift(@ips)); } Das funktioniert auch weiter korrekt wenn du Einträge entfernst oder hinzufügst. Nebenbei: Mittels "@ips[$nextIpIndex]"verlangst du von perl eine Liste zurück zu liefern, die aber nur ein Element enthält ("warnings" meldet sich) Beispiel: Code (perl): (dl
)
@list=@ips[0..3] Willst du nur ein Element haben solltest du das so schreiben: Code (perl): (dl
)
$element=$ips[0] |