Help for this page

Select Code to Download

Select or download this

for my $key1 (keys %$returnedData) {
   for my $key2 (keys %{$returnedData->{$key1}}) {
       print "$key1.$key2 = $returnedData->{$key1}->{$key2}\n";
   }
}

Select or download this

C:\tmp>type erick.pl

...
key3.key16 = data12