12:39 >perl 765_SoPW.pl
Before the assignments:
hash1: { barney => ["betty", "bamm-bamm"], fred => ["wilma", "pebbles"] }
hash2: { homer => ["marge", "bart", "lisa", "maggie"], romeo => ["juliet"] }

After the assignments:
hash1: {
  barney => ["betty", "bamm-bamm"],
  fred   => ["marge", "bart", "lisa", "maggie"],
}
hash2: { homer => ["marge", "bart", "lisa", "maggie"], romeo => ["juliet"] }
sub:   ["marge", "bart", "lisa", "maggie"]

After the push:
sub:   ["marge", "bart", "lisa", "maggie", "fred"]

12:39 >