Re^2: Each on anonymous hash is causing endless loop.


"be consistent"
	PerlMonks

Re^2: Each on anonymous hash is causing endless loop.

by LanX (Saint)

on Aug 24, 2022 at 21:22 UTC ( [id://11146392]=note: print w/replies, xml )

Need Help??

in reply to Re: Each on anonymous hash is causing endless loop.
in thread Each on anonymous hash is causing endless loop.

Thanks, good explanation!

I was expecting some kind of constant folding ...

C:\>perl -M5.012
my $x = 5;
while ( say {a=>1,b=>2}  ) { die "abort" unless --$x }
__END__
HASH(0xf5b3d0)
HASH(0xf5b508)
HASH(0xf5b3d0)
HASH(0xf5b508)
HASH(0xf5b3d0)
abort at - line 2.

C:\>
[download]

Cheers Rolf
_{(addicted to the Perl Programming Language :)

Wikisyntax for the Monastery}

Comment on Re^2: Each on anonymous hash is causing endless loop. Download Code

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://11146392]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others making s'mores by the fire in the courtyard of the Monastery: (4)

As of 2024-04-20 10:10 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found