Corion please heeeelllppp :D...Make me a christmas present and help me
+ find this code :P Really these days i tried and tried and tried all
+over again but with no success...In parallel forkmanager it's impossi
+ble to have double loops for the smtp and addresses in the same time
+and with your code I just can't make my script to work...I just want
+to take 10 addresses at a time with splice that is easy to make even
+for parallel fork manager but when I put the smtp servers with splice
+ too it only takes the addresses fine but the servers no...I managed
+to make a code like this :
#!/usr/bin/perl
use Parallel::ForkManager;
$fileaddress = $ARGV[0];
open(INFO, $fileaddress);
@addresses = <INFO>;
close(INFO);
$" = ",";
chomp @addresses;
$pm = new Parallel::ForkManager(2);
while (@addresses) {
@tenaddresses = splice(@addresses, 0, 10);
my $pid = $pm->start and next;
print "The ten values are @kkt2 : @tenaddresses\n";
$pm->finish;
}
How do I make that code to take the smtp servers from file smtp.txt an
+d inside the "my $pid = $pm->start and next;" to put a smtp server ev
+ery 10 addresses then send with 2 parallel forks at a time...sleep 10
+ and take the next 2 parallel forks and the next 10 addresses each (
+every fork has it's own smtp server and it's own 10 addresses )...Mak
+e it only print Sending with $smtpserver to this ten addresses : @add
+resses...Please help i don't know where else to search for help
|