##
my %hshAgg = $self->get_hshAgg();
dumpHash(%hshAgg);
##
##
HASH DUMP: HASH(0x223db34) =>
##
##
sub run {
my $self = Myobj->new(@_);
...
$self->set_hshAgg(%hshAgg);
...
}
# method within object
sub myProblem {
my %hshAgg = $self->get_hshAgg();
dumpHash(%hshAgg);
}