RE: [Expectperl-discuss] @Expect::(Before|After)_List

[Blackstone, J. D. <jda...@ci...>]

> -----Original Message-----
> From: Roland Giersig [mailto:RGi...@a1...]
> Sent: Friday, November 30, 2001 10:24 AM
> To: Blackstone J. David
> Cc: exp...@li...
> Subject: Re: [Expectperl-discuss] @Expect::(Before|After)_List
> 
> 
> >  I note the presence of undocumented package variables 
> > @Before_List and
> > @After_List, presumably for expect_after and expect_before 
> > functionality,like the original TCL expect.  Neat!
> 
> Yup, my goal is (was) to model the Perl version as close as possible 
> after the Tcl version.
> 
> >  It would be cool if in addition to the package variables 
> > (affecting all expect() calls), there was a per-object list as well.
> 
> Not without a complete rewrite. :-)

  Well, right now it pretty much says: "if @Expect::Before_List then
_multiexpect(@Expect::Before_List)."  What if it said: "@before_list =
(@Expect::Before_List, @{${*$self}{before_list}}); if @before_list then
_multiexpect @before_list"?  At any rate, just musing.

> BTW, Don Libes is planning a rewrite of the original Expect 
> and one of 
> the goals is to create a lib that can be easily integrated into all 
> kinds of scripting languages.  I already contacted him and 
> will see to 
> it that it works with Perl.  No timeframe has been discussed yet, so 
> don't hold 'yer breath.

  Cool!  That's one of the neatest things I've heard in awhile.  I never
figured that would happen, because he seemed to like TCL so much.  So did I,
originally, but life changed. :)

jdb