ehm I'm not sure, but do you mean this?

 
  DB<1> %list = ( test => [ qw#aa bb# ] )
  
  DB<2> p $list{test}[0]
aa
  DB<3> x %list
0  'test'
1  ARRAY(0x86fe158)
   0  'aa'
   1  'bb'
[download]

UPDATE: It really sucks that the perldebugger can't handle lexicals...

... seems that every line is evaled seperately such that the scope ends with the line.

... took me a wile to understand why

 
  DB<1> my %list = ( test => [ qw#aa bb# ] )
[download]

has no effect!