Re: [Expectperl-discuss] How to substitue a value within the expect qr'$val' <<< not working

[prem s. <pre...@ya...>]

Hi Matt,
   
  Thats great... It worked for me !!!
   
  ~Prem

Matt Zagrabelny <mzagrabe@d.umn.edu> wrote:
  
On Thu, 2008-01-03 at 03:59 -0800, Prem Sangeeth wrote: 
> I am using a sub routine of expect to be called in by all my testcases.
> For that, I am planning to send the arguments and based upon the arguments
> it should expect.
> 
> proc exp {
> 
> my @val1 = "@_[0]";
> my $val2 = "@_[1]";
> my $val3 = "@_[2]";
> 
> my $exp = Expect->spawn(@_[0]);
> $exp->log_file("buffer.txt", "w");
> 
> $exp->expect(10000,
> [ qr'"$val2"', <<<< even though $val2 has that value, here
> its breaking

I would try: qr/$val2/
which has worked for me.

-- 
Matt Zagrabelny - mzagrabe@d.umn.edu - (218) 726 8844
University of Minnesota Duluth
Information Technology Systems & Services
PGP key 1024D/84E22DA2 2005-11-07
Fingerprint: 78F9 18B3 EF58 56F5 FC85 C5CA 53E7 887F 84E2 2DA2

He is not a fool who gives up what he cannot keep to gain what he cannot
lose.
-Jim Elliot
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2005.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/_______________________________________________
Expectperl-discuss mailing list
Exp...@li...
https://lists.sourceforge.net/lists/listinfo/expectperl-discuss


       
---------------------------------
 Sent from Yahoo! &#45; a smarter inbox.