The Perl Cookbook recipie 16.8 says use the standard IPC::Open2 module: use IPC::Open2;
open2(*README, *WRITEME, $program); print WRITEME "Here's your input\n"; $output = <README>; close(WRITEME); close(README); However, it warns that there could be problems if the other program buffers input or output. You should probably perldoc IPC::Open2 for all of the details. ----- Original Message ----- From: "Chris Knipe" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Wednesday, July 17, 2002 3:09 PM Subject: executing binaries > Lo all, > > What's the best way to execute a binary command from within perl, and read > text returned by the binary, as well as write data to certain prompts that > the program may have? > > Say, I have... > > #>./myprogram > This is my program, I will ask you a question now > Please give me your name: WHATEVER > Thank you. > > In this instance, I want to read the output from the program, wait for > "name:", and send it WHATEVER. Then, based on the exit code of the > application, I want to execute various code (say, when the program exits > successfully, of when there is a error).... > > Does anyone have some pointers on this for me? How can I accomplish this.. > To my understanding, both system() and exec() are out of bounds here... Or > am I wrong? > > -- > me > > > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > > > -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
