#!/usr/bin/perl
my @array;
$array[0]{'key'} = "testline";
$item = \$array[0];
$array[0]{'key2'} = "testline2";

##</code><code>##

[me@system directory]$ perl -d aht.pl

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

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

main::(aht.pl:2):       my @array;
  DB<1> b 5
  DB<2> c
main::(aht.pl:5):       $array[0]{'key2'} = "testline2";
  DB<2> p $array[0]{'key'}
testline
  DB<3> p $array[0]
HASH(0x8086ab4)
  DB<4> p $$item
HASH(0x8086ab4)
  DB<5> p $$item{'key'}
Not a HASH reference at (eval 10)[/usr/lib/perl5/5.8.0/perl5db.pl:17] line 2.

  DB<6> q
[me@system directory]$