in reply to Re: sending email from checkbox with SMTP address associated in an HTML form
in thread sending email from checkbox with SMTP address associated in an HTML form

Just want to thank you for your time and help and not blowing me off from my inexperience and telling me to RTFM.
I have a questions regarding your little snipplet. Can you explained a little further or give expamples
as to what your comments below means... Do you mean take the value from the name=m_EmailGroups
like and value=sales in the HTML form?... that do you mean by the comment 'building address list' and 'setup the email stuff here'?
Thanks again!!

# take all of the values returned for m_EmailGroups and
# build an address list
# setup the email stuff here
  • Comment on Re: Re: sending email from checkbox with SMTP address associated in an HTML form

Replies are listed 'Best First'.
Re: Re: Re: sending email from checkbox with SMTP address associated in an HTML form
by antirice (Priest) on Jul 11, 2003 at 19:32 UTC

    Ok. Basically in your html code you created checkbox groups. Checkbox groups all have the same name but use different values. i.e.

    <input type="checkbox" name="m_EmailGroups" value="User1"> <input type="checkbox" name="m_EmailGroups" value="User2"> <input type="checkbox" name="m_EmailGroups" value="User3">

    If you check the first and second ones, they will be submitted as m_EmailGroups=User1&m_EmailGroups=User2. When we call $query->param("m_EmailGroups") in a list context, you get (User1,User2). The my @addresses ... line takes this list, wipes out all values that aren't keys of the %option_to_address hash, gathers the values for those keys and places them in the @addresses array. For the setup the email stuff here comment, I'm leaving that as a task for you to do. Just read up on Net::SMTP, specifically the recipient method.

    Hope this helps.

    antirice    
    The first rule of Perl club is - use Perl
    The
    ith rule of Perl club is - follow rule i - 1 for i > 1

      I read the Net::SMTP and added this to the perl Scipt....for some reason I get..
      "Can't call method "recipient" on an undefined value at C:\cgi-bin\mail_form.pl line 75."

      $smtp->recipient("To: @addresses\n");