my %hash;
for $i (1..10) {
  %hash = somefunc($i);
  $hash_of_hashes{$rn} = \%hash;     # WRONG!
}