$x = $hIn->{string};
$x = $hIn->{number};
Devel::Peek::Dump($x);

#followed immediately by

print "$x\n";
Devel::Peek::Dump($x);