foreach my $key1 (sort(keys(%facets))) {
foreach my $key2 (sort(keys(%facets{$key1))) {
print " $key1 / $key2 \n";
}
}
Spencer
On 2/10/06, Eric Lease Morgan <[EMAIL PROTECTED]> wrote:
>
> How do I loop through a reference to an array?
>
> I have the following data structure:
>
>my %fa
key2 (@{$facets{$key1}}) {
print " $key1 / $key2 \n";
}
}
would do it. Shoulda tried it first, I guess!
Spencer
On 2/10/06, Spencer Anspach <[EMAIL PROTECTED]> wrote:
> foreach my $key1 (sort(keys(%facets))) {
> foreach my $key2 (sort(keys(%facets{$key
