Did you try enumerating the keys of %hash?
foreach my $outerKey(sort keys %hash){
print $outerKey\n;
foreach my $innerKey(sort keys %{$hash{$outerKey}}){
print \t$innerKey\n;
}
}
-Original Message-
From: Peter Rabbitson [mailto:[EMAIL PROTECTED]
Sent: Monday, March
On Mon, Mar 14, 2005 at 05:32:01PM -0800, Tim Johnson wrote:
Did you try enumerating the keys of %hash?
foreach my $outerKey(sort keys %hash){
print $outerKey\n;
foreach my $innerKey(sort keys %{$hash{$outerKey}}){
print \t$innerKey\n;
}
}
I guess I have to explain
On Mar 14, Peter Rabbitson said:
sub sub_call {
my ($hashref, $object) = @_;
print Now working on $object using values\n;
foreach my $key (keys %{${$hahsref}{$object}}) {
print $key\n;
}
}
Simple enough right? What I was asking is how can I get the
And once again, you've written some round-about referencing code:
sigh... I'll get it some day. As far as dereferencing with -, which I
asked earlier but I never got an answer to. For example are
$sources{${$batch_ref}{by_method}}{card_def}
and
$sources-($batch_ref-by_method)-card_def
On Mar 15, Peter Rabbitson said:
sigh... I'll get it some day. As far as dereferencing with -, which I
asked earlier but I never got an answer to. For example are
$sources{${$batch_ref}{by_method}}{card_def}
and
$sources-($batch_ref-by_method)-card_def
No, not at all.
