#!/usr/bin/perl6
use v6;

=begin pod

Merging hashes is similar to what was done in Perl 5.

=end pod

my %person = (
    fname => 'Foo',
    lname => 'Bar',
);

my %extra = (
	email => 'foo@bar.com',
	phone => 123,
);

%person = (%person, %extra);

for %person.keys -> $k {
	say "$k {%person{$k}}";
}