You might want to look into Devel::Peek:

#!/usr/bin/perl
use strict;
use warnings FATAL => qw(all);
use Inline 'C';
use Devel::Peek;

my $test = eg();

Dump( $test );

$test = undef;

__DATA__
__C__
SV *eg () {
    HV *rv = newHV();
    hv_store(rv, "x", 1, newSVpv("hello", 0), 0);
    return newRV_noinc((SV*)rv);
}
[download]

Outputs:

C:\test>junkic
SV = RV(0x267460) at 0x267450
  REFCNT = 1
  FLAGS = (PADMY,ROK)
  RV = 0x2d0200
  SV = PVHV(0x357b620) at 0x2d0200
    REFCNT = 1
    FLAGS = (SHAREKEYS)
    ARRAY = 0x36132d8  (0:7, 1:1)
    hash quality = 100.0%
    KEYS = 1
    FILL = 1
    MAX = 7
    RITER = -1
    EITER = 0x0
    Elt "x" HASH = 0x9303a5e5
    SV = PV(0x37cf50) at 0x37f128
      REFCNT = 1
      FLAGS = (POK,pPOK)
      PV = 0x36d2f18 "hello"\0
      CUR = 5
      LEN = 8
[download]

Which looks fine, but only serves to tell us that what you've posted isn't indicative of your actual code.