use strict;
use warnings;
use Data::Dumper;
my $arrayref = [
                 'Country',
                 'location',
                 'language'
                 ];
my $hashref = {

            'name'        => "Harsha",
            'designation' => "Manager"
};


${$hashref}{personal} = $arrayref;

print Dumper($hashref);