Основное использование

В этом руководстве объясняются основы использования клиентской библиотеки Perl для API Google Ads.

Инициализируйте клиент

Чтобы начать использовать библиотеку, создайте экземпляр Google::Ads::GoogleAds::Client . Клиент можно настроить несколькими способами, как описано в руководстве по настройке . Наиболее распространённый подход — использование файла googleads.properties :

use Google::Ads::GoogleAds::Client;

my $api_client = Google::Ads::GoogleAds::Client->new();

Создать услугу

После инициализации клиента вы можете создавать экземпляры различных API-сервисов. Например, для взаимодействия с кампаниями необходимо создать экземпляр CampaignService :

my $campaign_service = $api_client->CampaignService();

Сделать вызов API

Вот пример вызова API для получения кампаний. Этот фрагмент демонстрирует инициализацию клиента, создание сервиса и вызов метода.

use strict;
use warnings;
use Google::Ads::GoogleAds::Client;
use Google::Ads::GoogleAds::V22::Services::GoogleAdsService::SearchGoogleAdsRequest;

# Initialize the Google Ads client. See the [Configuration guide](configuration) for more options.
my $api_client = Google::Ads::GoogleAds::Client->new();

# Get the GoogleAdsService.
my $google_ads_service = $api_client->GoogleAdsService();

# Specify the customer ID and query.
my $customer_id = "INSERT_CUSTOMER_ID_HERE";
my $query = "SELECT campaign.name, campaign.status FROM campaign";

# Create a search request.
my $search_request = Google::Ads::GoogleAds::V22::Services::GoogleAdsService::SearchGoogleAdsRequest
    ->new({
    customerId => $customer_id,
    query      => $query
});

# Execute the search request.
my $search_response = $google_ads_service->search($search_request);

# Iterate over the results and print campaign names.
foreach my $google_ads_row (@{$search_response->{results}}) {
    printf "Campaign with resource name '%s' and name '%s'.\n",
        $google_ads_row->{campaign}->{resourceName},
        $google_ads_row->{campaign}->{name};
}

Обработка ошибок

Вызовы API могут приводить к исключениям. Для перехвата и обработки Google::Ads::GoogleAds::GoogleAdsException следует заключать вызовы API в блоки eval .

use strict;
use warnings;
use Google::Ads::GoogleAds::Client;
use Google::Ads::GoogleAds::GoogleAdsException;
use Google::Ads::GoogleAds::V22::Services::GoogleAdsService::SearchGoogleAdsRequest;

my $api_client = Google::Ads::GoogleAds::Client->new();
my $google_ads_service = $api_client->GoogleAdsService();
my $customer_id = "INSERT_CUSTOMER_ID_HERE";
my $query = "SELECT campaign.name, campaign.status FROM campaign";
my $search_request = Google::Ads::GoogleAds::V22::Services::GoogleAdsService::SearchGoogleAdsRequest->new({
    customerId => $customer_id,
    query      => $query
});

eval {
    my $search_response = $google_ads_service->search($search_request);
    # Process successful response.
    foreach my $google_ads_row (@{$search_response->{results}}) {
        printf "Campaign name: %s\n", $google_ads_row->{campaign}->{name};
    }
};
if ($@) {
    if (blessed($@) && $@->isa('Google::Ads::GoogleAds::GoogleAdsException')) {
        my $exception = $@;
        printf "A Google Ads exception occurred:\n";
        printf " Request ID: %s\n", $exception->get_request_id();
        foreach my $error (@{$exception->get_errors()}) {
            printf " Error code: %s\n", $error->{errorCode};
            printf " Message: %s\n", $error->{message};
        }
    } else {
        # Print other types of exceptions.
        print "An error occurred: $@\n";
    }
}

Изучите другие примеры

В примерах вы найдёте несколько полезных примеров кода. Большинство примеров требуют параметров. Вы можете передать параметры как аргументы (рекомендуется) или отредактировать значения INSERT_XXXXX_HERE в исходном коде. Чтобы увидеть инструкцию по использованию для примера, передайте -help в качестве аргумента командной строки.

perl examples/basic_operations/get_campaigns.pl -help