http://qs321.pair.com?node_id=635479


in reply to Just can sent only ONE mail every time.

quit ends the connection according to the docs. You probably have to create a new Net::SMTP object for every email. (Each email can have more than one recipient, though.)

Replies are listed 'Best First'.
Re^2: Just can sent only ONE mail every time.
by pysome (Scribe) on Aug 28, 2007 at 03:26 UTC
    Thanks. But if i put the new Net::SMTP in sub sendMail.It means every list will be connect the mail server once,it's so time-consuming.
    Do you some other method.Or how to organise the "order" ?Thanks again
[reply]
      Did you check if SMTP (or the version on which Net::SMTP is based) can send more than one message per connection? Even HTTP wasn't able to do so originally. At a glance, it doesn't look like SMTP can either.
[reply]
        Fixed! Thanks everybody.
        I only add a sub "over" and comment the sub "quit" in sendMail :
        sub over {
  $self = @_;
  $self->{SMTP}->quit;

        [download]

        Then i add the sub in end of my a.pl 

          ...
  use MySMTP;
  $mail = new MySMTP();
  my @lists = $mail->get_list();
  
  for my $addr (@list) {
      $mail->sendMail($addr,"how are you");    
  }
  $mail->over();  ## Add here

        [download]
[reply]
[d/l]
[select]

      Why not simply pass the list of addresses in and send the one email to multiple recipients using either TO or BCC addressing?

      DWIM is Perl's answer to Gödel
[reply]

In Section Seekers of Perl Wisdom