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

[Matt Z. <mzagrabe@d.umn.edu>]

On Thu, 2008-01-03 at 03:59 -0800, Prem Sangeeth wrote:=20
> 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 argument=
s
> it should expect.
>=20
> proc exp {
>=20
>  my @val1 =3D "@_[0]";
>  my $val2 =3D "@_[1]";
>  my $val3 =3D "@_[2]";
>=20
>  my $exp =3D Expect->spawn(@_[0]);
>  $exp->log_file("buffer.txt", "w");
>=20
>  $exp->expect(10000,
>              [   qr'"$val2"',    <<<< even though $val2 has that value, h=
ere
> its breaking

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

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