Thanks to everyone for pointing me in the right direction(s). The script is
hard to follow and although I would love to re-write it, it has been
performing a key business process reliably for 10 years so I would need a
very good reason.

I might re-write it just as an exercise for myself though.

John

> -----Original Message-----
> From: Uri Guttman [mailto:[email protected]] 
> Sent: Thursday, 29 April 2010 4:11 p.m.
> To: John Bruin
> Cc: [email protected]
> Subject: Re: sendmail arguments
> 
> >>>>> "JB" == John Bruin <[email protected]> writes:
> 
>   JB> I have inherited a Perl script which sends and parses 
> email. I am
>   JB> having trouble trying to figure out what the "-oi" and "-oem"
>   JB> arguments do in the sub below. Can anyone help?
> 
>   JB> sub mail(*) {
>   JB>         my $top = shift;
>   JB>         open(MAIL, "| $sendmail -t -oi -oem") or die "open: $!";
>   JB>         $top->print(\*MAIL);
>   JB>         close MAIL;
>   JB> }
> 
> 
> look at the manual page for sendmail. if you don't have man 
> pages installed, google for it. those are common options to 
> use when sending mail from a program. 
> 
> if you want to rewrite it to make it better, there are many 
> good mail modules that do all that for you and you don't need 
> to see options like that. the above is old style coding for mailing.
> 
> uri
> 
> --
> Uri Guttman  ------  [email protected]  --------  
> http://www.sysarch.com --
> -----  Perl Code Review , Architecture, Development, 
> Training, Support ------
> ---------  Gourmet Hot Cocoa Mix  ----  
> http://bestfriendscocoa.com ---------
> 
> --
> To unsubscribe, e-mail: [email protected] For 
> additional commands, e-mail: [email protected] 
> http://learn.perl.org/
> 
> 
> 


-- 
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/


Reply via email to