Um.  If I can take a guess, you are confusing the 
from with the actual mailserver.  From whould be
something like "[EMAIL PROTECTED]" or something
similar.

Fix $from to be valid, and replace:

   my($smtp);

with this:

  my $smtp = Net::SMTP->new('ccs1.dlsu.edu.ph');


  - regards, 
    Joaquin Menchaca



> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED]]On Behalf 
> Of Rafferty
> Uy
> Sent: Monday, March 25, 2002 12:31 AM
> To: [EMAIL PROTECTED]
> Subject: Net::SMTP and forms with image links
> 
> 
> Hello,
> 
>   I'm using the Net::SMTP module to send mails.. but
> It won't work since I'm not receiving any e-mail from
> my site. The smtp server that I'm using is
> "ccs1.dlsu.edu.ph" is there anything wrong with my
> code? 
> 
> use Net::SMTP;
> 
> my($smtp);
> my $from = "ccs1.dlsu.edu.ph";
> 
> $smtp->mail($from);
> $smtp->to($strEmail);
> $smtp->data();
> $smtp->datasend("To: $strEmail <mailto: $strEmail>
> ($strFirstname $strLastname\n");
> $smtp->datasend("From: $from <$from> (Webmaster)\n");
> $smtp->datasend("Subject: Perl Harbor - Registration
> Information\n");
> $smtp->datasend("\n");
> $smtp->datasend("Registration Successful\n");
> $smtp->dataend();
> $smtp->quit;
> 
> Another problem is that perl won't interpret anything
> below this stmp set of codes..
> 
> 
> Also,
> 
> When I use an image which is directed to my .pl file..
> my program wasn't able to get the values in the text
> fields.. I know how to get the values using buttons..
> I tried adding an <INPUT type=submit> line at the
> image link.. but then, the image becomes a button..
> What do I have to do?
> 
> Thank you very much,
> Rafferty
> 
> __________________________________________________
> Do You Yahoo!?
> Yahoo! Movies - coverage of the 74th Academy Awards.
> http://movies.yahoo.com/
> _______________________________________________
> ActivePerl mailing list
> [EMAIL PROTECTED]
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
> 
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to