c:\perl\perl>perl -d hash_array.pl

Loading DB routines from perl5db.pl version 1.19
Editor support available.

Enter h or `h h' for help, or `perldoc perldebug' for more help.

main::(hash_array.pl:7):        my @array = 0..4;
  DB<1> c 24
[snip Dumper output]
main::(hash_array.pl:24):       print "";
  DB<2> x \%hash
0  HASH(0x1c23ca4)
   'one' => ARRAY(0x1c1b9ac)
      0  0
      1  1
      2  2
      3  3
      4  4
   'two' => ARRAY(0x1c1b9ac)
      -> REUSED_ADDRESS