From: Tan R. <tr...@ho...> - 2005-05-24 04:35:12
|
I did some more debugging and now am trying the following code: &foreign_require("proc", "proc-lib.pl"); ($fh, $pid) = &proc::pty_process_exec("bldora9ddl -UR test gl gltransrel"); print "$fh $pid"; @list=&proc::list_processes($pid); $cmd=@list[0]->{args}; print "<br>$cmd"; that last print statement gives me: "perl /usr/local/webmin/miniserv.pl /etc/webmin/miniserv.conf" which is weird cause I am expecting to see "bldora9ddl -UR test gl gltransrel". Any clues what I am doing wrong here? Its funny cause when I try the passwd example the print statment gives me the correct command. Thanks Tan ----Original Message Follows---- From: Jamie Cameron <jca...@we...> Reply-To: web...@li... To: web...@li... Subject: Re: [webmin-devel] pty_process_exec Date: 24 May 2005 13:39:50 +1000 On Tue, 2005-05-24 at 12:27, Tan Rezaei wrote: > I am trying to get this to work but I get a "-1" as my $rv when I run it. I > am not sure what I am doing wrong. > > &foreign_require("proc", "proc-lib.pl"); > ($fh, $pid) = &proc::pty_process_exec("$driver -UR $pdline $sys $tab"); > while(1) { > $rv = &wait_for($fh, "Are you sure you want to continue (Yy)\?"); > print $rv; > if ($rv == 0) { > print "Saying Yes"; > sysprint($fh, "y\n"); > } > else { > last; > } > } > close($fh); > > > And my prompt looks like this when I run the command from the terminal: > > This option will also remove all of the data. > Are you sure you want to continue (Yy)? > > I need to type in "y" here and hit enter here. > > I have also tried maney other patterns in place of "Are you sure you want to > continue (Yy)?" > > I even tried just "\?" or "\\?" nothing seems to work. > > Thanks for your help You could try changing the wait_for call to something like : $rv = &wait_for($fh, 'Are you sure you want to continue \(Yy\)\?'); Quoting the (, ) and ? characters is important, as the parameters to wait_for are regular expressions. - Jamie ------------------------------------------------------- This SF.Net email is sponsored by Oracle Space Sweepstakes Want to be the first software developer in space? Enter now for the Oracle Space Sweepstakes! http://ads.osdn.com/?ad_id=7412&alloc_id=16344&op=click - Forwarded by the Webmin development list at web...@we... To remove yourself from this list, go to http://lists.sourceforge.net/lists/listinfo/webadmin-devel |