|
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
|