@addr_slice = @addresses[$cnt..$cnt+20];
    . . . . 
  To => join(', ',@addr_slice),

[download]
I assume that one of the things that the package you are advocating makes real easy is *not* exposing one person's email address to another person. Do *not* use anything like the above code and expect to be thanked for it. One of the good side-effects of the original code was that no recipient would discover anyone elses email address.

While it does make a lot of sense to try to send to more than one recipient at a time, at least _try_ to use the Bcc: field to do so, not the To: or Cc: fields.

BTW: the efficiency best comes into play if you can sort your addresses by destination host name (the "right-hand side" of the email address). This way it is possible to send one copy from your side to the remote SMTP server, where it is then the remote side that make and distributes copies to the several local recipients.

In reply to Re^2: Most efficient way to send mass email? by shenme
in thread Most efficient way to send mass email? by JaredHess

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.