$response = $country->get($inserted); ok (defined $response, '$response is defined'); ok (ref $response eq 'ARRAY', '$response is a reference to an array'); ok ($response->[0]->{country} eq 'Lummerland', '$response->[0]->{country} has expected value: "Lummerland"'); ok ($response->[0]->{country_code} eq 'LUM', '$response->[0]->{country_code} has expected value: "LUM"'); ok ($country->remove($inserted), '$country->remove($inserted) called and succeeded'); exit;