#Consider the output of the following
my %family_name = (
   "Alis" => "Williams",
   "Sara" => "McAwesome",
   "Serena" => "Anderson",
   );
   
my $key = keys %family_name;
print $key;
print "\n";
my $val = values %family_name;
print $val;
print "\n";
my @keys = keys %family_name;
print "@keys\n";
my @values = values %family_name;
print "@values\n";