From: | "ON(dot)KG" <skyer(at)on(dot)kg> |
---|---|
To: | pgsql-general(at)postgresql(dot)org |
Subject: | PL/Perl |
Date: | 2005-01-11 11:59:55 |
Message-ID: | 1906385406.20050111145955@on.kg |
Views: | Raw Message | Whole Thread | Download mbox | Resend email |
Thread: | |
Lists: | pgsql-general |
Hi All!
I'm trying in 'plperl' forking the processes by 'fork' function,
but receiving this message
Warning: pg_exec(): Query failed: ERROR: creation of function failed: 'fork' trapped by operation mask at (eval 2) line 11.
Does it mean, that in 'plperl' I can't use 'fork' function???
function example
=================
CREATE OR REPLACE FUNCTION perl_fork_test ()
RETURNS int2
AS '
my %pid;
my @urls = (
"http://domain1.com/index.php",
"http://domain2.com/index.php"
);
foreach my $url (@urls) {
unless ($pid{$url} = fork) {
my $html = qx/GET "$url"/;
$ENV{TERM} = &my_exit;
sub my_exit {
exit(0);
}
}
}
sleep 6;
foreach my $url (keys %pid) {
kill SIGTERM, $pid{$url};
}
wait;
return 1;
'
LANGUAGE 'plperl';
===================
VOLATILE
CALLED ON NULL INPUT
SECURITY INVOKER
===================
Thanx
From | Date | Subject | |
---|---|---|---|
Next Message | Jason Tesser | 2005-01-11 12:43:43 | views in 8.0 |
Previous Message | Richard Huxton | 2005-01-11 10:55:16 | Re: PL/Perl |