Cc: [EMAIL PROTECTED]
> Subject: Spam:Re: Frowarding mail automatically through script
>
> sub mail()
> {
> my $from="[EMAIL PROTECTED]";
> my $to=$recipient;
> my $sendmailpath="/usr/sbin/sendmail";
>
>
> open (SENDMAIL, "| $sendm
[EMAIL PROTECTED] wrote:
sub mail()
Why the (), you're not shift()ing anything??
{
my $from="[EMAIL PROTECTED]";
my $to=$recipient;
Why localize a more "global" var?
why not:
my $to = shift;
or just use $recipient?
And also for the other vars?
my $sendmailpath="/usr/sbin/sendmail";
If this is har
From: Mike Blezien <[EMAIL PROTECTED]>
> I would strongly suggest using the Mail::Sender module also, extermely
> versitile for all types of email needs, SMTP with or without
> authentication, uses Sendmail, all types of mail attachments if
uses Sendmail?
Well the server ... yes, why not, the mod
EMAIL PROTECTED]>
Cc: <[EMAIL PROTECTED]>
Sent: Sunday, November 28, 2004 11:31 AM
Subject: Re: Frowarding mail automatically through script
> sub mail()
> {
> my $from="[EMAIL PROTECTED]";
> my $to=$recipient;
> my $sendmailpath="/usr/sbin/sendmail";
&
sub mail()
{
my $from="[EMAIL PROTECTED]";
my $to=$recipient;
my $sendmailpath="/usr/sbin/sendmail";
open (SENDMAIL, "| $sendmailpath -t");
print SENDMAIL "Subject: From Guest Book $subject\n";
print SENDMAIL "From: $from\n";
print SENDMAIL "To: $to\n\n";
print SENDMAIL "$content\n\n";
c
JupiterHost.Net wrote:
vishwas bhakit wrote:
i had written following script for sending mail automatically through
PERL using "sendmail" program in the perl script.
But its not workig. What may be the problem with it.
It doesn't:
- use strict;
- use warnings;
- check to see if the open() to se
vishwas bhakit wrote:
i had written following script for sending mail automatically through
PERL using "sendmail" program in the perl script.
But its not workig. What may be the problem with it.
It doesn't:
- use strict;
- use warnings;
- check to see if the open() to sendmail worked or not
-
i had written following script for sending mail automatically through
PERL using "sendmail" program in the perl script.
But its not workig. What may be the problem with it.
#!/usr/local/bin/perl
$name = 'name';
$email = 'mail id';
open(MAIL, "| /usr/lib/sendmail -oi -n -t");
print MAIL <
Thank Yo
