$x = $response->{name};
$j = $response->{email};
$k = $response->{country};

print "Name Is: $x\n";
print "Email Is: $j\n";
print "Country Is: $k\n";