Hey all,
Okay.. I am stumped. I must be doing something wrong. I am going to post
only the relevant code, let me know if you need more.
# $FUNC is a ref to a hash
## in a subroutine
foreach my $function (keys %{$FUNC}){
my @called_funcs;
# populate @called_funcs;
push @{$FUNC->{$function}}, @called_funcs;
}
## later in code in another subroutine
foreach my $pkg_func (keys %{$FUNC}){
print join "\n", @$FUNC{ $pkg_func };
print "\n";
}
__END__
what gets printed is:
ARRAY(0x18942c)
ARRAY(0x13134c)
etc.
Why didn't the array get dereferenced? Am I populating it wrong?
NOTE: I have 'use strict' on.
Help is appreciated,
Nikola Janceski
I swallow up goods and treasures,
And to others I give pleasure,
Moon and Sun won't let me be,
And there are things that live in me.
-- Riddles
----------------------------------------------------------------------------
--------------------
The views and opinions expressed in this email message are the sender's
own, and do not necessarily represent the views and opinions of Summit
Systems Inc.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
