foreach my $key (keys %$observation){
    foreach my $key (keys %$observation){