Merging a blank hash

[Derek Basch]

If I am merging a blank hash into a populated hash how do I prevent
blank key/value pairs from being created?

This:

my %hash1 = ();
my %hash2 = (
key1 => 'cat',
key2 => 'dog'
);

my %hash3 = (%hash1, %hash2);

while (my ($key, $value) = each(%hash3)) {
print "$key: $value\n\n";
}

outputs:

 

[it_says_BALLS_on_your forehead]

If I am merging a blank hash into a populated hash how do I prevent
blank key/value pairs from being created?

This:

my %hash1 = ();
my %hash2 = (
key1 => 'cat',
key2 => 'dog'
);

my %hash3 = (%hash1, %hash2);

while (my ($key, $value) = each(%hash3)) {
print "$key: $value\n\n";
}

outputs:
-----------------
key2: dog

key1: cat

------------------

Are you sure the newlines aren't from the extra newline you are
printing out after the value?

 

[Derek Basch]

Are you sure the newlines aren't from the extra newline you are
printing out after the value?

OMG. Sulks away in idiocy. Thanks. Sorry.

 

[it_says_BALLS_on_your forehead]

OMG. Sulks away in idiocy. Thanks. Sorry.

Are you sure you don't mean "skulks"? ;-).

No worries. I've done LOTS of idiotic things, and I've only been in the
business for 2 years.