Re: Re: Re: Problems with unopened filehandle after upgrade to ActivePerl 5.6.1

That did it, I don't understand why though... did they change something that I didn't catch in the docs? It was always working fine like that before...

-----BEGIN GEEK CODE BLOCK----- Version: 3.12 GIT d- s:++ a--- C++++ UL P+++>++++ L+ E- W++>+++ N !o K- w+ O---- M-- V-- PS PE Y- PGP t++(+++) 5(+++)++++ X R+@ tv+ b+++ DI+ D- G e->+++ h! r-- y- ------END GEEK CODE BLOCK------ Translate

"Weird things happen, get used to it."

Flame ~ Lead Programmer: GMS

Comment on Re: Re: Re: Problems with unopened filehandle after upgrade to ActivePerl 5.6.1

Replies are listed 'Best First'.
Re4: Problems with unopened filehandle after upgrade to ActivePerl 5.6.1 by blakem (Monsignor) on Jan 11, 2002 at 14:36 UTC
No idea why it worked... my typeglob-fu is somewhat weak. I just happened to notice it while fiddling around with your example. Here are some smallest-case scenerios: `#### in 5.6.1 F works, but \F fails % perl5.6.1 -we'{local F; $tmp=F; open F,">out"} print $tmp $tmp'; % cat out main::F % perl5.6.1 -we'{local F; $tmp=\*F; open F,">out"} print $tmp $tmp'; print() on unopened filehandle F at -e line 1.` [download] -Blake	[reply] [d/l]

Replies are listed 'Best First'.

Re4: Problems with unopened filehandle after upgrade to ActivePerl 5.6.1
by blakem (Monsignor) on Jan 11, 2002 at 14:36 UTC

#### in 5.6.1  *F  works, but  \*F  fails
% perl5.6.1 -we'{local *F; $tmp=*F; open F,">out"}  print $tmp $tmp'; 
% cat out
*main::F

% perl5.6.1 -we'{local *F; $tmp=\*F; open F,">out"}  print $tmp $tmp';
print() on unopened filehandle F at -e line 1.
[download]

-Blake

[reply]
[d/l]