Bidirectional pipes

[Mehmet Ekici]

Hi all,
I wonder how can I open pipe to STDIN and STDOUT of a process ?

Tnx.
Mehmet

[Mehmet Ekici]

Hello,
I tried it to use with sqplus username/passwd

after this I like to send some sql commands and get their results but
at some point system blocks and I don't get anything

$ph = open2 (\*Reader , \*Writer, "sqlplus xxx/yyy");

print Writer , "desc user_tables;\n";
while (<Reader>)
{
print ;
}

..... (it hang somewhere here )
print Writer , "desc dba_tables;\n";
while (<Reader>)
{
print ;
}








Sudarshan Raghavan
<sraghava@kyocera-wi To: [email]beginners@perl.org[/email]
reless.com> cc:
Subject: Re: Bidirectional pipes
09/02/2003 11:21 AM






[email]Mehmet.Ekici@alcatel.com.tr[/email] wrote:

>Hi all,
>I wonder how can I open pipe to STDIN and STDOUT of a process ?
>

perldoc IPC::Open2

If you need a handle to STDERR
perldoc IPC::Open3

>
>Tnx.
>Mehmet
>
>
>
>
>

--
To unsubscribe, e-mail: [email]beginners-unsubscribe@perl.org[/email]
For additional commands, e-mail: [email]beginners-help@perl.org[/email]

[Sudarshan Raghavan]

[email]Mehmet.Ekici@alcatel.com.tr[/email] wrote:

>Hello,
>I tried it to use with sqplus username/passwd
>
>after this I like to send some sql commands and get their results but
>at some point system blocks and I don't get anything
>
>$ph = open2 (\*Reader , \*Writer, "sqlplus xxx/yyy");
>
>print Writer , "desc user_tables;\n";
>while (<Reader>)
>{
> print ;
>}
>
>.... (it hang somewhere here )
>

The IPC::Open2 manpage mentions a warning on similar lines. I am not
entirely sure about using this module with sqlplus and any associated
caveats, you might want to google on this topic. I guess you are using
an oracle database, why not use DBI for this purpose. You will
interested in these modules
DBI (perldoc DBI)
DBD::Oracle (hope I got the name right. perldoc DBD::Oracle, you can
download and install this module from [url]http://search.cpan.org[/url])

>print Writer , "desc dba_tables;\n";
>while (<Reader>)
>{
> print ;
>}
>
>
>
>
>
>
>
>
> Sudarshan Raghavan
> <sraghava@kyocera-wi To: [email]beginners@perl.org[/email]
> reless.com> cc:
> Subject: Re: Bidirectional pipes
> 09/02/2003 11:21 AM
>
>
>
>
>
>
>Mehmet.Ekici@alcatel.com.tr wrote:
>
>
>

>>Hi all,
>>I wonder how can I open pipe to STDIN and STDOUT of a process ?
>>
>>
>>

>
>perldoc IPC::Open2
>
>If you need a handle to STDERR
>perldoc IPC::Open3
>
>
>

>>Tnx.
>>Mehmet
>>
>>
>>
>>
>>
>>
>>

>
>
>--
>To unsubscribe, e-mail: [email]beginners-unsubscribe@perl.org[/email]
>For additional commands, e-mail: [email]beginners-help@perl.org[/email]
>
>
>
>
>
>
>
>
>

[Mehmet Ekici]

Hi,
I have already using DBI module, I just wanted to explain with an example.
Let think that I want to be root user and issue some command in that case I
also need
bidirectional pipes.

su - root
Password ....

execute some commands here .

Mehmet



Sudarshan Raghavan
<sraghava@kyocera-wi To: [email]beginners@perl.org[/email]
reless.com> cc:
Subject: Re: Bidirectional pipes
09/02/2003 02:27 PM








[email]Mehmet.Ekici@alcatel.com.tr[/email] wrote:

>Hello,
>I tried it to use with sqplus username/passwd
>
>after this I like to send some sql commands and get their results but
>at some point system blocks and I don't get anything
>
>$ph = open2 (\*Reader , \*Writer, "sqlplus xxx/yyy");
>
>print Writer , "desc user_tables;\n";
>while (<Reader>)
>{
> print ;
>}
>
>.... (it hang somewhere here )
>

The IPC::Open2 manpage mentions a warning on similar lines. I am not
entirely sure about using this module with sqlplus and any associated
caveats, you might want to google on this topic. I guess you are using
an oracle database, why not use DBI for this purpose. You will
interested in these modules
DBI (perldoc DBI)
DBD::Oracle (hope I got the name right. perldoc DBD::Oracle, you can
download and install this module from [url]http://search.cpan.org[/url])

>print Writer , "desc dba_tables;\n";
>while (<Reader>)
>{
> print ;
>}
>
>
>
>
>
>
>
>

> Sudarshan Raghavan

> <sraghava@kyocera-wi To:

[email]beginners@perl.org[/email]

> reless.com> cc:

> Subject: Re:

Bidirectional pipes

> 09/02/2003 11:21 AM

>

>

>
>
>
>
>Mehmet.Ekici@alcatel.com.tr wrote:
>
>
>

>>Hi all,
>>I wonder how can I open pipe to STDIN and STDOUT of a process ?
>>
>>
>>

>
>perldoc IPC::Open2
>
>If you need a handle to STDERR
>perldoc IPC::Open3
>
>
>

>>Tnx.
>>Mehmet
>>
>>
>>
>>
>>
>>
>>

>
>
>--
>To unsubscribe, e-mail: [email]beginners-unsubscribe@perl.org[/email]
>For additional commands, e-mail: [email]beginners-help@perl.org[/email]
>
>
>
>
>
>
>
>
>

--
To unsubscribe, e-mail: [email]beginners-unsubscribe@perl.org[/email]
For additional commands, e-mail: [email]beginners-help@perl.org[/email]

[Ruslan]

Hi all,
I wonder how can I open pipe to STDIN and STDOUT of a process ?

Tnx.
Mehmet

use FileHandle;
use IPC::Open2;
$pid = open2(*Reader, *Writer, "cat -u -n" );
print Writer "stuff\n";
$got = <Reader>;