[Expectperl-discuss] RE: perl 500404 with Expect 1.15

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

> -----Original Message-----
> From: ex...@ih... [mailto:ex...@ih...]
> Sent: Thursday, June 06, 2002 7:35 PM
> To: Blackstone, J. David
> Cc: exp...@li...
> Subject: Re: perl 500404 with Expect 1.15

...

> It looks like my problems are in Expect with spawn
> these lines seem to be where things just hang: 
> 
>   144      open(STDIN,"<&". $slv->fileno())
>   147      open(STDOUT,">&". $slv->fileno())
>   150      open(STDERR,">&". $slv->fileno()) 
> 
> Okay maybe I'm SOL but maybe someone has a hunch on what
> the problem is???

  I think that is fairly new syntax as well.  I was trying something like
that recently in an unrelated program and had trouble making it work, but I
don't remember if it was because it was an older perl.

> >   5.004 is several years old; I'd hammer my sysadmin with 
> this and beg them
> > to upgrade. :)
> 
> If only life were so simple....I have the power to perform the upgrade
> but there are dependencies on this perl.  I don't know what 
> they are.... 

  Oh, ho, ho. :)   You need my super-special means of running many perls at
once trick.  Compile with --prefix=/usr/local/perl561.  Make symlinks from
everything in /usr/local/perl561/bin EXCEPT /usr/local/perl561/bin/perl into
/usr/local/bin.  Then write your programs explicitly with:
#!/usr/local/bin/perl5.6.1
or
#!/usr/[local/]?bin/perl5.00502

  Then your programs don't break on upgrades and you can easily remove a
version as a unit if and when you upgrade all programs that used it.

jdb