Help for this page

Select Code to Download


  1. or download this
    package Toy_Iterator;

...
print "undef'ing \$a...\n";
undef $a;
print "done undef'ing\n";
  2. or download this
    Toy_Iterator=HASH(0x80fbc2c) -> 3
Toy_Iterator=HASH(0x80fbc2c) -> 4
...
undef'ing $a...
done undef'ing
Destroying Toy_Iterator=HASH(0x80fbc2c)
  3. or download this
    Toy_Iterator=HASH(0x80fbc2c) -> 3
Toy_Iterator=HASH(0x80fbc2c) -> 4
...
undef'ing $a...
Destroying Toy_Iterator=HASH(0x80fbc2c)
done undef'ing