my @response = split /\,/ $response, 39;