Re: Indepedent lazy iterators for the same hash?

I imagine its theoretically possible :) $ perl -MDevel::Peek -e " %f=1..10; Dump\%f; scalar each %f;Dump\%f; "

SV = IV(0x3f9bd8) at 0x3f9bdc
  REFCNT = 1
  FLAGS = (TEMP,ROK)
  RV = 0x99ba04
  SV = PVHV(0x3feec4) at 0x99ba04
    REFCNT = 2
    FLAGS = (SHAREKEYS)
    ARRAY = 0x99412c  (0:3, 1:5)
    hash quality = 150.0%
    KEYS = 5
    FILL = 5
    MAX = 7
    RITER = -1
    EITER = 0x0
    Elt "1" HASH = 0x806b80c9
    SV = IV(0x3f9a58) at 0x3f9a5c
      REFCNT = 1
      FLAGS = (IOK,pIOK)
      IV = 2
    Elt "3" HASH = 0xa400c7f3
    SV = IV(0x3f9b38) at 0x3f9b3c
      REFCNT = 1
      FLAGS = (IOK,pIOK)
      IV = 4
    Elt "7" HASH = 0xecc9d984
    SV = IV(0x3f9b88) at 0x3f9b8c
      REFCNT = 1
      FLAGS = (IOK,pIOK)
      IV = 8
[download]

SV = IV(0x3f9bd8) at 0x3f9bdc
  REFCNT = 1
  FLAGS = (TEMP,ROK)
  RV = 0x99ba04
  SV = PVHV(0x3feec4) at 0x99ba04
    REFCNT = 2
    FLAGS = (OOK,SHAREKEYS)
    ARRAY = 0x99d2c4  (0:3, 1:5)
    hash quality = 150.0%
    KEYS = 5
    FILL = 5
    MAX = 7
    RITER = 1
    EITER = 0x990df4
    Elt "1" [CURRENT] HASH = 0x806b80c9
    SV = IV(0x3f9a58) at 0x3f9a5c
      REFCNT = 1
      FLAGS = (IOK,pIOK)
      IV = 2
    Elt "3" HASH = 0xa400c7f3
    SV = IV(0x3f9b38) at 0x3f9b3c
      REFCNT = 1
      FLAGS = (IOK,pIOK)
      IV = 4
    Elt "7" HASH = 0xecc9d984
    SV = IV(0x3f9b88) at 0x3f9b8c
      REFCNT = 1
      FLAGS = (IOK,pIOK)
      IV = 8
[download]

update : This looks interesting

hash iterator hash iterator

Hash::StoredIterator - Functions for accessing a hashes internal iterator.

Comment on Re: Indepedent lazy iterators for the same hash? Select or Download Code

Replies are listed 'Best First'.
Re^2: Independent lazy iterators for the same hash? by Happy-the-monk (Canon) on Jun 30, 2013 at 18:44 UTC
Hash::StoredIterator - Functions for accessing a hashes internal iterator. Wooooot! That's great news (for me at the least). Thanks, Anony! Cheers, Sören (hooked on the Perl Programming language)	[reply]