AW: sendmail arguments

John Bruin asked: > I have inherited a Perl script which sends and parses email. I > am having trouble trying to figure out what the "-oi" and > "-oem" arguments do in the sub below. Can anyone help? "-oe" sets the ErrorMode. >From http://www.sendmail.org/~ca/email/man/sendmail.html: ErrorMod

Re: matching values of one hash to another

Harry Putnam wrote: I need to do some matching of filenames in two top level directories. We expect to find a number of cases where the endnames ($_) are the same in both hierarchies but the full name is different. base1/my/file base2/my/different_path/file I've made hashes of the file nam

Re: sendmail arguments

At 3:10 PM +1200 4/29/10, John Bruin wrote: I have inherited a Perl script which sends and parses email. I am having trouble trying to figure out what the "-oi" and "-oem" arguments do in the sub below. Can anyone help? Thanks John sub mail(*) { my $top = shift; open(MAIL, "| $s

Re: sendmail arguments

John Bruin wrote: I have inherited a Perl script which sends and parses email. I am having trouble trying to figure out what the "-oi" and "-oem" arguments do in the sub below. Can anyone help? They are arguments for the program in $sendmail. First you have to find out what $sendmail contains

matching values of one hash to another

I need to do some matching of filenames in two top level directories. We expect to find a number of cases where the endnames ($_) are the same in both hierarchies but the full name is different. base1/my/file base2/my/different_path/file I've made hashes of the file names in two top level d

sendmail arguments

I have inherited a Perl script which sends and parses email. I am having trouble trying to figure out what the "-oi" and "-oem" arguments do in the sub below. Can anyone help? Thanks John sub mail(*) { my $top = shift; open(MAIL, "| $sendmail -t -oi -oem") or die "open: $!";

Re: about dispatch tables

Steve Bertrand writes: First off let me thank you for the time and effort involved in replying. > On 2010.04.26 15:24, Harry Putnam wrote: > >> I want to try to describe briefly what problem I'm having. >> But not show any working code. > > That's ok, but it isn't clear to me that you have reall

RE: Perl not closing TCP sockets if clients are no longer connected?

I haven't done much of this with Perl, but for most socket drivers the only way to detect the connection was closed by the other end is to try to read from it. If the remote end actually sends a FIN packet, you will get a specific result from the read that you can use to trigger closure on your end

Perl not closing TCP sockets if clients are no longer connected?

The purpose of the application is to listen for a specific UDP multicast and then to forward the data to any TCP clients connected to the server. The code works fine, but I have a problem with the sockets not closing after the TCP clients disconnects. A socketsniffer utility shows the the sockets r

Re: Interactive shell in Perl

Parag Kalra wrote: Hey All, Hello, Wanted to know if Perl has any interactive shell (just like Python, Bash, Ruby etc have) by any chance. And if yes how do we invoke that. perldoc -q "Is there a Perl shell" John -- The programmer is fighting against the two most destructive forces in the

Re: perl setuid/suid and "use MODULE"

On 28 April 2010 09:45, David Lee wrote: > Briefly: Hi, Unfortunately I can't offer you any inspired way to open that port. > I have tried to put as much as reasonably possible of the application into > local CPAN-like modules, with just the initial C wrapper and small perl > script outside th

perl setuid/suid and "use MODULE"

Briefly: Although I'm reasonably comfortable (though certainly not expert) with perl scripts running under a setuid C wrapper, and am familiar with "Programming Perl (3rd edition)" on the topic, nothing in my searches seems to help when the script wishes to do a "use MODULE::NAME", and when t

Re: Perl executable

On Wed, Apr 28, 2010 at 4:27 AM, Vaishak S wrote: > The reason why I am putting this to executable is the DBI is having the > password in the connection string, which we don't want to share with any of > other users who log to the system and to protect the code. > > We are still in the dark searc

Re: Too many arguments for OneTickUtil::getFilesFromDir at G:\workspace1\scripts\fooPackage.pl line 4, near "$pattern)"

On 27 April 2010 15:39, dbtouch wrote: > Hi, Perl Folks Hello. > I am getting error "Too many arguments for > OneTickUtil::getFilesFromDir at G:\workspace1\scripts\fooPackage.pl > line 4, near "$pattern)" when running a small script calling a package > routine. Could you give some ideas on what

Perl executable

Hello all, Can you please help me in building perl executable in Windows box? I am currently having issue with the system at office in installing the pacakges individually or from the ppm. looks like the firewall do not allow me to install them eventhough I have admin rights for the system. My s

Re: about dispatch tables

On 2010.04.26 15:24, Harry Putnam wrote: > I hope some of you will go along with this approach. > > I want to try to describe briefly what problem I'm having. > But not show any working code. > > I've made so much of a mess trying a lot of different things I'd like > to have some idea that at lea

Too many arguments for OneTickUtil::getFilesFromDir at G:\workspace1\scripts\fooPackage.pl line 4, near "$pattern)"

Hi, Perl Folks I am getting error "Too many arguments for OneTickUtil::getFilesFromDir at G:\workspace1\scripts\fooPackage.pl line 4, near "$pattern)" when running a small script calling a package routine. Could you give some ideas on what I did wrong? Thanks, db # OneTickUtil.pm use File::Find

Re: Interactive shell in Perl

Hi, On Wednesday 28 Apr 2010 09:45:59 Jeff Pang wrote: > On Wed, Apr 28, 2010 at 2:38 PM, Parag Kalra wrote: > > Hey All, > > > > Wanted to know if Perl has any interactive shell (just like Python, Bash, > > Ruby etc have) by any chance. And if yes how do we invoke that. > > > > Cheers, > > Par