Try:

You may need to adjust the number in the final list element selector, since none of your hashrefs in the example match the one you asked about.

Thanks for weighing in Everyone
This answer gives me the way to do what I wanted...


You are right, I had cut and pasted the wrong hashref for my final example
What I was really looking for was a way to explore deep-down in the guts of just one of the grep results

Putting the paren around the output of grep lets me index into the grep results
and then I can even go deeper into the data structure from there


<

 x 2 (grep {$_->{CHIPS_PART_NAME}=~/gravity/i} @goodRefDes)[4]
0  HASH(0xe0b0f3c)
   'CDS_LIB' => 'contactor'
   'CDS_LMAN_SYM_OUTLINE' => '-150,1400,150,-1400'
   'CDS_LOCATION' => 'SITE1_19'
   'CDS_PART_NAME' => 'GRAVITY_DIL_DUT_56_DGV_CONTACTOR-56P-FULL-GRAVI
+TY_DIL_DUT_56_DGV'
   'CDS_PHYS_PART_NAME' => 'GRAVITY_DIL_DUT_56_DGV_CONTACTOR-56P-FULL-
+GRAVITY_DIL_DUT_56_DGV'
   'CDS_SEC' => 1
   'CHIPS_PART_NAME' => 'GRAVITY_DIL_DUT_56_DGV'
   'DCF_ID' => 'SITE1_19'
   'DESCRIPTION' => 'DUT, DIL, DGV, 56-PIN'
   'DESIGN_BLK_INFO' => HASH(0xe0ad774)
   'HPATH_INFO_LIST' => ARRAY(0xe0b1944)
   'LOCATION' => 'SITE1_19'
   'PACK_TYPE' => 'CONTACTOR-56P-FULL'
   'PART_NUMBER' => 'GRAVITY_DIL_DUT_56_DGV'
   'PHYS_PAGE' => 1
   'PIN_LIST' => ARRAY(0xe0b16d4)
   'PROP_INFO' => HASH(0xe0b15e4)
   'RAW_HPATH' => '@\\6632725_lib\\.\\6632725\\(sch_1):page72_i6@\\663
+2725_lib\\.locustsite(sch_1):page1_i2'
   'ROT' => 0
   'SEC' => 1
   'VER' => 2
   'XY' => '(-4850,2200)'
[download]

and even:

 x 2 (grep {$_->{CHIPS_PART_NAME}=~/gravity/i} @goodRefDes)[4]->{PIN_L
+IST}[0]
0  HASH(0xe0b1b54)
   'ALT_NAME' => 'SITE1_19.1'
   'PIN_NAME' => '\\1\\'
   'PN' => 1
[download]

Couldn't find it documented with h x , but the 1 limits the output to the first level.

Good to know! :)

Update

Demo

DB<17> !1
@a = map +{$_=>[1..3]}, a ..d

  DB<18> x 1 @a
0  HASH(0xa7041080)
1  HASH(0xa70411c0)
2  HASH(0xa70413e0)
3  HASH(0xa6f048c0)
  DB<19> x 2 @a
0  HASH(0xa7041080)
   'a' => ARRAY(0xa70098d0)
1  HASH(0xa70411c0)
   'b' => ARRAY(0xa7027540)
2  HASH(0xa70413e0)
   'c' => ARRAY(0xa7027860)
3  HASH(0xa6f048c0)
   'd' => ARRAY(0xa7041b70)
  DB<20>
[download]

I may have misunderstood your question.

If you want to dive selectively into a particular sub-hash, why don't you just select that hash by name or index?

 
  DB<27> x 1 @a
0  HASH(0xa7041080)
1  HASH(0xa70411c0)
2  HASH(0xa70413e0)
3  HASH(0xa6f048c0)
  DB<28> x grep /080\)/,@a
0  HASH(0xa7041080)
   'a' => ARRAY(0xa70098d0)
      0  1
      1  2
      2  3
  DB<29> x @a[1]
0  HASH(0xa70411c0)
   'b' => ARRAY(0xa7027540)
      0  1
      1  2
      2  3
  DB<30>
[download]

Cheers Rolf
_{(addicted to the Perl Programming Language :)
Wikisyntax for the Monastery FootballPerl is like chess, only without the dice}

I'm surprised because x dives into nested structures.

Looks for me like you are only returning stringifications of hash refs instead.

update

Please ignore...

I wasn't aware about the maxdepth option when using x ...

from perldebug#Debugger-Commands

• x [maxdepth] expr

... since the internal help doesn't show it

  DB<79> h x
x expr        Evals expression in list context, dumps the result.
[download]

If you want to filter further either add one more grep expression,
x grep {more filtering...} grep {$_->{CHIPS_PART_NAME}=~/gravity/i} @goodRefDes
or if the order of hash entries is meaningful, accessing the array by indexing is another option, eg. access the last entry.
x (grep {$_->{CHIPS_PART_NAME}=~/gravity/i} @goodRefDes)[-1]

Is source code something like this? I'm not sure?:

my @gravity_hashrefs = grep {$_->{CHIPS_PART_NAME}=~/gravity/i} @goodR
+efDes;
[download]

Then add
 print Dumper \@gravity_hashrefs;?

It is possible to add extra statements into a grep{}.
I think this would work....

grep { if ($_->{CHIPS_PART_NAME}=~/gravity/i)
       {
          print Dumper $_;
          1;
       }
       else 
       { 
          0;
       }          
     } @goodRefDes;
[download]