RE: Issue with Mail::Sender : what is the function called?

[Brian Raven]

From: perl-win32-users-boun...@listserv.activestate.com
[mailto:perl-win32-users-boun...@listserv.activestate.com] On Behalf Of
andy_b...@wiwb.uscourts.gov
Sent: 05 March 2009 22:07
To: gai...@visioninfosoft.com
Cc: h-tagu...@secom.co.jp; perl-win32-users@listserv.activestate.com;
perl-win32-users-boun...@listserv.activestate.com
Subject: RE: Issue with Mail::Sender : what is the  function called?


  ... but what exactly is the  function called? 
 
 It's called a here doc - it's a unix/shell convention, allowing
multiline input: 
 $ mail root EOM 
  hi 
  
  mom 
  
  . 
  EOM 
 
 (old 'mail' ends w/ a '.' on line by itself) 
 
 perldoc -q HERE.Doc 
 
 Found in /usr/lib/perl5/5.8.0/pod/perlfaq4.pod 
Why don't my HERE documents work? 
 ... 

To add to that useful info, it is actually an operator rather than a
function, and is also described in 'perldoc perlop'.

HTH

-- 
Brian Raven 

---
This e-mail may contain confidential and/or privileged information. If you are 
not the intended recipient or have received this e-mail in error, please advise 
the sender immediately by reply e-mail and delete this message and any 
attachments without retaining a copy. Any unauthorised copying, disclosure or 
distribution of the material in this e-mail is strictly forbidden.


___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

RE: Issue with Mail::Sender : what is the function called?

[Greg Aiken]

please forgive my ignorance, but what exactly is the  function called?
Ive tried to search the net for perl and  and cant seem to find
anything about this?

-Original Message-
From: perl-win32-users-boun...@listserv.activestate.com
[mailto:perl-win32-users-boun...@listserv.activestate.com] On Behalf Of ?? ?
Sent: Wednesday, March 04, 2009 4:30 PM
To: perl-win32-users@listserv.activestate.com
Subject: RE: Issue with Mail::Sender : Help needed

Hello,

Did you already resolve it?
There is space before *END*.

#!Perl
print *END*;
 Hello,
 world!
 *END*
 
Regards, 




From: perl-win32-users-boun...@listserv.activestate.com
[mailto:perl-win32-users-boun...@listserv.activestate.com] On Behalf Of Perl
Perl
Sent: Wednesday, March 04, 2009 10:07 PM
To: perl-win32-users@listserv.activestate.com
Subject: Issue with Mail::Sender : Help needed



Dear All,

I am getting the below error for Mail::Sender utility. Which sends
the mail. Your help will be a great help for me. Error is,

Can't find string terminator *END* anywhere before EOF at
Mail_Attach.pl line 18.


Please find the complete code as below, and platform is Linux.

 

#!usr/local/bin/perl -w

use Mail::Sender;

$Sender = new Mail::Sender ( {
  from = 'mail...@network.com',
  Error = 'Code'
 } )
 or die  Can't create the sender object
$Mail::Sender::Error \n;
$Sender - OpenMultipart ( {
   to = 'maid_...@network.com',
   cc = 'mail_...@network.com',
   subject = 'Checked out Reminder'
 } )
 or die  Can't open Multiple connection
$Sender - {'Error'} \n;
#$Sender-Body({ msg = '*END*' }); # error is here
$Sender-Body;
 $Sender-SendEnc('*END*'); # if I use this code, then
error is here.

Hi User,
   How are you ? 
   Long time to send a mail.
 Here is a new module Mail::Sender.

 *END*

$Sender - Attach ( {
   description = 'File file.txt is checked out',
   ctype = 'application/x-zip-encoded',
   encoding = 'Base64',
   disposition =  'attachment; filename=file.zip;
type=ZIP archive',
   file = 'file.zip'
  }) 
  or die  Can't attach the file : $Sender - {'Error_Code'}
\n;

$Sender - Close() or die  Can't Send the mail $Sender - { 'Error'
} \n;

 

Regards,

Mujju

 

___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs




___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

RE: Issue with Mail::Sender : what is the function called?

[Andy_Bach]

 ... but what exactly is the  function called?

It's called a here doc - it's a unix/shell convention, allowing 
multiline input:
$ mail root EOM
 hi
 
 mom
 
 .
 EOM

(old 'mail' ends w/ a '.' on line by itself)

perldoc -q HERE.Doc

Found in /usr/lib/perl5/5.8.0/pod/perlfaq4.pod
   Why don?t my HERE documents work?
...



---
Andy Bach
Systems Mangler
Internet: andy_b...@wiwb.uscourts.gov
Voice: (608) 261-5738; Cell: (608) 658-1890

Entropy just ain't what it used to be___
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs