Running svrmgrl from perl script

From: Bhasker Ravikanti <Bhasker.Ravikanti_at_CAS.Honeywell.Com>
Date: Tue, 06 Oct 1998 14:37:51 -0700
Message-ID: <361A8DAF.C38CB0E3@CAS.Honeywell.Com>

Hi,

I am running into a problem when using open2() with Oracle's svrmgrl under release 7.3.4. The script works fine with release 7.3.3 Here is my script:

#!/usr/bin/perl

use FileHandle;
use IPC::Open2;

$pid = open2(\*SVROUT, \*SVRIN, "svrmgrl");

SVRIN->autoflush();

print SVRIN "exit;\n";
close(SVRIN);

while (<SVROUT>) {
print;
}

close(SVROUT);
exit;

Here is the output when running under RDBMS 7.3.3

Oracle Server Manager Release 2.3.3.0.0 - Production

Oracle7 Server Release 7.3.3.3.0 - Production Release With the distributed, replication and parallel query options PL/SQL Release 2.3.3.2.0 - Production

SVRMGR> Server Manager complete.

Here is the output when running under RDBMS 7.3.4

Oracle Server Manager Release 2.3.4.0.0 - Production

Oracle7 Server Release 7.3.4.0.0 - Production With the distributed, replication and parallel query options PL/SQL Release 2.3.4.0.0 - Production

SVRMGR> MGR-11401: input error, unable to read input line MGR-01508: unable to close the current file

Any help would be appreciated
Thanks.

Bhasker Ravikanti,
Technical Senior Staff,
Honeywell S&AC Shared Services Team.

Bhasker Ravikanti,
Technical Senior Staff,
Honeywell S&AC Shared Services Team. Received on Tue Oct 06 1998 - 16:37:51 CDT