I have a web service that need to get stuff from the system and is
using the following subroutine to retrieve info.
sub systeminfo {
if (open(FROMADMIN,-|)) { # parent
undef local $/;
my $rv = FROMADMIN; # get response
close FROMADMIN;
return $rv;
}
else {
Michael wrote:
I have a web service that need to get stuff from the system and is
using the following subroutine to retrieve info.
sub systeminfo {
if (open(FROMADMIN,-|)) { # parent
[...]
This works fine for command line exection and from cgi but fails in
modperl (apache 1x).
The problem
On Thu, Aug 28, 2003 at 06:43:42PM -0700, Stas Bekman wrote:
Michael wrote:
I have a web service that need to get stuff from the system and is
using the following subroutine to retrieve info.
sub systeminfo {
if (open(FROMADMIN,-|)) { # parent
[...]
This works fine for command