On Saturday 19 February 2005 03:06, Stas Bekman wrote:
> What about?
> $r->spawn_proc_prog
> http://perl.apache.org/docs/2.0/api/Apache/SubProcess.html#C_spawn_proc_pro
>g_

Thanks for those links, Stas! I had to find them by myself as they are in 
docs...

The following worked for me:

A helper subroutine:

sub safe_exec {
    my $out_fh = $apr->spawn_proc_prog ( '/path/to/exec_helper.pl', [EMAIL 
PROTECTED] );
    close $out_fh;
}


And a helper script:

#!/usr/bin/perl -w
use strict;
use warnings;
use POSIX;

POSIX::setsid;

close STDIN;
open STDOUT, '+>>', '/path/to/apache/error_log';
open STDERR, '>&STDOUT';

exec ( @ARGV );
CORE::exit(0);

1;


-- 
Best Regards,
Igor Shevchenko

Reply via email to