#!/usr/bin/perl -w

my %defaults = (name => "George", age => 26);
my %config = (age => 18);

my %hash = (%defaults, %config);

print "$_ : $hash{$_}\n" foreach (keys %hash);