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:u...@stemsystems.com] > Sent: Thursday, 29 April 2010 4:11 p.m. > To: John Bruin > Cc: beginners@perl.org > Subject: Re: sendmail arguments > > >>>>> "JB" == John Bruin <john.br...@nec.co.nz> 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 ------ u...@stemsystems.com -------- > http://www.sysarch.com -- > ----- Perl Code Review , Architecture, Development, > Training, Support ------ > --------- Gourmet Hot Cocoa Mix ---- > http://bestfriendscocoa.com --------- > > -- > To unsubscribe, e-mail: beginners-unsubscr...@perl.org For > additional commands, e-mail: beginners-h...@perl.org > http://learn.perl.org/ > > > -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
