in reply to Re: Re: Re: Perl script crashing at lockfile ?
in thread Perl script crashing at lockfile ?
At line 430 in the version of FormMail.pl I havesub newmail { my ($self, $scriptname, $postmaster, @recipients) = @_; my $command = $self->{Mailprog}; $command .= qq{ -f "$postmaster"} if $postmaster; my $pipe; eval { local $SIG{__DIE__}; $pipe = IO::File->new("| $command"); }; if ($@) { die $@ unless $@ =~ /Insecure directory/; delete $ENV{PATH}; $pipe = IO::File->new("| $command"); } die "Can't open mailprog [$command]\n" unless $pipe; $self->{Pipe} = $pipe; $self->output_trace_headers($scriptname); }
.. is IO::File part of the NMS libraries, or a standard Perl one ? (I have no idea if they are called libraries)use IO::File;
Peter
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re5: Perl script crashing at lockfile ?
by dragonchild (Archbishop) on Oct 02, 2003 at 14:51 UTC |