From: Rafferty Uy <[EMAIL PROTECTED]>
>   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";

Put an eval{} block around the code to catch and print errors.

> $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;

it'll end here and you'll do something like:

        } # end of eval {}
        if ($@) {
                print "<font color=red>ERROR: $@</FONT>
                </BODY></HTML>";
                exit;
        }

> 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?

Did you try <INPUT TYPE=IMAGE ... ?

Jenda

=========== [EMAIL PROTECTED] == http://Jenda.Krynicky.cz ==========
There is a reason for living. There must be. I've seen it somewhere.
It's just that in the mess on my table ... and in my brain
I can't find it.
                                        --- me
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to