try
From=> $name,
$name = '[EMAIL PROTECTED]'
gwyn
Cary Hung wrote:
>
> Hi all,
>
> I'm trying to send email via perl script, however, I've the following
> problem.
>
> use Mail::Sendmail;
> sub mail_send
> {
> %mail = (
> To => '[EMAIL PROTECTED]',
> From => "$[EMAIL PROTECTED]",
> subject => 'Send email',
> Message => "\nThis is a very short message.\n"
> );
>
> sendmail(%mail) or die $Mail::Sendmail::error;
> print "OK. Log says:\n", $Mail::Sendmail::log;
> }
>
> $name = 'peter';
> mail_send;
>
> However, it displays '$[EMAIL PROTECTED]' instead of '[EMAIL PROTECTED]'.
> Anyone can help?
>
> Thanks
> Cary
--
----------------
Gwyn Roberts
Centre For Applied Oceanography Canolfan Eigioneg Gymhywsol
University Wales Bangor Prifysgol Cymru Bangor
LL59 5EY
tel +44 (0)1248 713808
fax +44 (0)1248 71672
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
