The code samples below provide examples of common remarketing functions using the AdWords API. Client Library.
Add audience
#!/usr/bin/perl -w
#
# Copyright 2017, Google Inc. All Rights Reserved.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
# This example adds a remarketing user list (a.k.a. Audience) and shows its
# associated conversion tracker code snippet.
use strict;
use lib "../../../lib";
use utf8;
use Google::Ads::AdWords::Client;
use Google::Ads::AdWords::Logging;
use Google::Ads::AdWords::v201705::Predicate;
use Google::Ads::AdWords::v201705::BasicUserList;
use Google::Ads::AdWords::v201705::Selector;
use Google::Ads::AdWords::v201705::UserListConversionType;
use Google::Ads::AdWords::v201705::UserListOperation;
use Cwd qw(abs_path);
use Data::Uniqid qw(uniqid);
# Example main subroutine.
sub add_audience {
my $client = shift;
# Create conversion type (tag).
my $name = "Mars cruise customers #" . uniqid();
my $conversion_type =
Google::Ads::AdWords::v201705::UserListConversionType->new({name => $name});
# Create remarketing user list.
my $user_list = Google::Ads::AdWords::v201705::BasicUserList->new({
name => $name,
conversionTypes => [$conversion_type],
# Additional properties (non-required).
description => "A list of mars cruise customers in the last year",
membershipLifeSpan => 365,
status => "OPEN"
});
# Create operation.
my $operation = Google::Ads::AdWords::v201705::UserListOperation->new({
operator => "ADD",
operand => $user_list
});
# Add user list.
my $result =
$client->AdwordsUserListService()->mutate({operations => [$operation]});
if ($result->get_value()) {
my $user_list = $result->get_value()->[0];
# Due to a bug in the service we need to retrieve the conversion trackers
# info in a separate request after a few seconds.
sleep(5);
my $predicate = Google::Ads::AdWords::v201705::Predicate->new({
field => "Id",
operator => "IN",
values => [$user_list->get_id()->get_value()]});
my $selector = Google::Ads::AdWords::v201705::Selector->new({
fields => ["ConversionTypes"],
predicates => [$predicate]});
my $conversion_trackers_page =
$client->AdwordsUserListService()->get({serviceSelector => $selector});
# Get associated conversion snippets.
my $conversion_id =
$conversion_trackers_page->get_entries()->[0]->get_conversionTypes()->[0]
->get_id()->get_value();
# Create selector.
my $conversion_type_predicate =
Google::Ads::AdWords::v201705::Predicate->new({
field => "Id",
operator => "IN",
values => [$conversion_id]});
$selector = Google::Ads::AdWords::v201705::Selector->new({
fields => ["Id"],
predicates => [$conversion_type_predicate]});
# Get all conversion trackers.
my $page =
$client->ConversionTrackerService()->get({serviceSelector => $selector});
my $conversion_tracker = $page->get_entries()->[0];
# Display results.
printf "User list with name \"%s\" and id \"%d\" was added.\n",
$user_list->get_name(), $user_list->get_id();
printf "Conversion type code snippet associated to the list:\n%s\n",
$conversion_tracker->get_snippet();
} else {
print "No user list was added.";
}
return 1;
}
# Don't run the example if the file is being included.
if (abs_path($0) ne abs_path(__FILE__)) {
return 1;
}
# Log SOAP XML request, response and API errors.
Google::Ads::AdWords::Logging::enable_all_logging();
# Get AdWords Client, credentials will be read from ~/adwords.properties.
my $client = Google::Ads::AdWords::Client->new({version => "v201705"});
# By default examples are set to die on any server returned fault.
$client->set_die_on_faults(1);
# Call the example
add_audience($client);
Add conversion tracker
#!/usr/bin/perl -w
#
# Copyright 2017, Google Inc. All Rights Reserved.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
# This example adds an AdWords conversion tracker.
use strict;
use lib "../../../lib";
use utf8;
use Google::Ads::AdWords::Client;
use Google::Ads::AdWords::Logging;
use Google::Ads::AdWords::v201705::AdWordsConversionTracker;
use Google::Ads::AdWords::v201705::ConversionTrackerOperation;
use Cwd qw(abs_path);
use Data::Uniqid qw(uniqid);
# Example main subroutine.
sub add_conversion_tracker {
my $client = shift;
# Create adwords conversion tracker.
my $conversion_tracker =
Google::Ads::AdWords::v201705::AdWordsConversionTracker->new({
name => "Earth to Mars Cruises Conversion #" . uniqid(),
# Additional properties (non-required).
status => "ENABLED",
category => "DEFAULT",
textFormat => "HIDDEN",
viewthroughLookbackWindow => 15,
conversionPageLanguage => "en",
backgroundColor => "#0000FF",
defaultRevenueValue => 1,
alwaysUseDefaultRevenueValue => 1
});
# Create operation.
my $conversion_operation =
Google::Ads::AdWords::v201705::ConversionTrackerOperation->new({
operator => "ADD",
operand => $conversion_tracker
});
# Add conversion tracker.
my $result =
$client->ConversionTrackerService()
->mutate({operations => [$conversion_operation]});
# Display conversion tracker.
if ($result->get_value()) {
my $conversion_tracker = $result->get_value()->[0];
printf "Conversion tracker with id \"%d\", name \"%s\", status \"%s\" " .
"and category \"%s\" was added.\n", $conversion_tracker->get_id(),
$conversion_tracker->get_name(), $conversion_tracker->get_status(),
$conversion_tracker->get_category();
printf "With associated code snippet:\n%s\n",
$conversion_tracker->get_snippet();
} else {
print "No conversion tracker was added.";
}
return 1;
}
# Don't run the example if the file is being included.
if (abs_path($0) ne abs_path(__FILE__)) {
return 1;
}
# Log SOAP XML request, response and API errors.
Google::Ads::AdWords::Logging::enable_all_logging();
# Get AdWords Client, credentials will be read from ~/adwords.properties.
my $client = Google::Ads::AdWords::Client->new({version => "v201705"});
# By default examples are set to die on any server returned fault.
$client->set_die_on_faults(1);
# Call the example
add_conversion_tracker($client);
Add CRM-based user list
#!/usr/bin/perl -w
#
# Copyright 2017, Google Inc. All Rights Reserved.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
# This example adds a user list (a.k.a. audience) and uploads members
# to populate the list.
#
# Note: It may take up to several hours for the list to be populated
# with members. Email addresses must be associated with a Google account.
# For privacy purposes, the user list size will show as zero until the list
# has at least 1000 members. After that, the size will be rounded to the
# two most significant digits.
use strict;
use lib "../../../lib";
use utf8;
use Google::Ads::AdWords::Client;
use Google::Ads::AdWords::Logging;
use Google::Ads::AdWords::v201705::AddressInfo;
use Google::Ads::AdWords::v201705::CrmBasedUserList;
use Google::Ads::AdWords::v201705::Member;
use Google::Ads::AdWords::v201705::MutateMembersOperand;
use Google::Ads::AdWords::v201705::MutateMembersOperation;
use Google::Ads::AdWords::v201705::UserListOperation;
use Cwd qw(abs_path);
use Data::Uniqid qw(uniqid);
use Digest::SHA qw(sha256_hex);
sub add_crm_based_user_list {
my $client = shift;
# Create a user list.
my $user_list = Google::Ads::AdWords::v201705::CrmBasedUserList->new({
name => "Customer relationship management list #" . uniqid(),
description => "A list of customers that originated from email addresses",
# See limit here:
# https://support.google.com/adwords/answer/6276125#requirements.
membershipLifeSpan => "30"
});
# Create operation.
my $operation = Google::Ads::AdWords::v201705::UserListOperation->new({
operator => "ADD",
operand => $user_list
});
# Add user list.
my $result =
$client->AdwordsUserListService()->mutate({operations => [$operation]});
# Display user list.
if ($result->get_value()) {
my $user_list_added = $result->get_value()->[0];
printf(
"User list with name '%s' and ID '%d' was added.\n",
$user_list_added->get_name(),
$user_list_added->get_id());
}
my @members = ();
# Add e-mails to the user list.
if ($result->get_value()) {
# Use SHA256 to encode the e-mails.
# All e-mails MUST be trimmed and lower-cased before encoding.
my @email_list = (
'customer1@example.com', 'customer2@example.com',
' Customer3@example.com '
);
foreach my $email (@email_list) {
$email = sha256_hex(_to_normalized_string($email));
my $member = Google::Ads::AdWords::v201705::Member->new({
hashedEmail => $email
});
push @members, $member;
}
# Adding address info is currently available on a whitelist-only basis.
# This code demonstrates how to do it, and you can uncomment it if you are
# on the whitelist.
# my $first_name = "John";
# my $last_name = "Doe";
# my $country_code = "US";
# my $zip_code = "10011";
#
# my $address_info = Google::Ads::AdWords::v201705::AddressInfo->new({
# # First and last name must be normalized and hashed.
# hashedFirstName => sha256_hex(_to_normalized_string($first_name)),
# hashedLastName => sha256_hex(_to_normalized_string($last_name)),
# # Country code and zip code are sent in plaintext.
# countryCode => $country_code,
# zipCode => $zip_code
# });
#
# my $member_by_address = Google::Ads::AdWords::v201705::Member->new({
# addressInfo => $address_info
# });
# push @members, $member_by_address;
my $userlist_id = $result->get_value()->[0]->get_id();
my $operand = Google::Ads::AdWords::v201705::MutateMembersOperand->new({
userListId => $userlist_id,
membersList => \@members
});
my $member_operation =
Google::Ads::AdWords::v201705::MutateMembersOperation->new({
operator => "ADD",
operand => $operand
});
# Add members to the user list based on email addresses.
my $result =
$client->AdwordsUserListService()
->mutateMembers({operations => [$member_operation]});
# Display results.
# Reminder: it may take up to 9 hours for the list to be populated
# with members.
for $user_list ($result->get_userLists()) {
printf(
"%d email addresses were uploaded to user list with name '%s' " .
"and ID '%d' and are scheduled for review.\n",
scalar(@email_list), $user_list->get_name(),
$user_list->get_id());
}
} else {
print "No user list was added.";
}
return 1;
}
sub _to_normalized_string {
my ($input_string) = @_;
$input_string =~ s/^\s+|\s+$//g;
$input_string = lc $input_string;
return $input_string;
}
# Don't run the example if the file is being included.
if (abs_path($0) ne abs_path(__FILE__)) {
return 1;
}
# Log SOAP XML request, response and API errors.
Google::Ads::AdWords::Logging::enable_all_logging();
# Get AdWords Client, credentials will be read from ~/adwords.properties.
my $client = Google::Ads::AdWords::Client->new({version => "v201705"});
# By default examples are set to die on any server returned fault.
$client->set_die_on_faults(1);
# Call the example
add_crm_based_user_list($client);
Add rule-based user list
#!/usr/bin/perl -w
#
# Copyright 2017, Google Inc. All Rights Reserved.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
# This example adds two rule-based remarketing user lists: one with no site
# visit date restrictions, and another that will only include users who visit
# your site in the next six months.
use strict;
use lib "../../../lib";
use utf8;
use Google::Ads::AdWords::Client;
use Google::Ads::AdWords::Logging;
use Google::Ads::AdWords::v201705::BasicUserList;
use Google::Ads::AdWords::v201705::DateKey;
use Google::Ads::AdWords::v201705::DateRuleItem;
use Google::Ads::AdWords::v201705::DateSpecificRuleUserList;
use Google::Ads::AdWords::v201705::ExpressionRuleUserList;
use Google::Ads::AdWords::v201705::NumberKey;
use Google::Ads::AdWords::v201705::NumberRuleItem;
use Google::Ads::AdWords::v201705::Operator;
use Google::Ads::AdWords::v201705::Rule;
use Google::Ads::AdWords::v201705::RuleItem;
use Google::Ads::AdWords::v201705::RuleItemGroup;
use Google::Ads::AdWords::v201705::StringKey;
use Google::Ads::AdWords::v201705::StringRuleItem;
use Google::Ads::AdWords::v201705::UserListOperation;
use Cwd qw(abs_path);
use Data::Uniqid qw(uniqid);
# Example main subroutine.
sub add_rule_based_user_lists {
my $client = shift;
# First rule item group - users who visited the checkout page and had more
# than one item in their shopping cart.
my $checkout_string_rule_item =
Google::Ads::AdWords::v201705::StringRuleItem->new({
key => Google::Ads::AdWords::v201705::StringKey->new(
{name => "ecomm_pagetype"}
),
op => "EQUALS",
value => "checkout"
});
my $checkout_rule_item = Google::Ads::AdWords::v201705::RuleItem->new(
{StringRuleItem => $checkout_string_rule_item});
my $cart_size_number_rule_item =
Google::Ads::AdWords::v201705::NumberRuleItem->new({
key =>
Google::Ads::AdWords::v201705::NumberKey->new({name => "cartsize"}),
op => "GREATER_THAN",
value => "1"
});
my $cart_size_rule_item = Google::Ads::AdWords::v201705::RuleItem->new(
{NumberRuleItem => $cart_size_number_rule_item});
# Combine the two rule items into a RuleItemGroup so AdWords will AND their
# rules together.
my $checkout_multiple_item_group =
Google::Ads::AdWords::v201705::RuleItemGroup->new(
{items => [$checkout_rule_item, $cart_size_rule_item]});
# Second rule item group - users who check out during the next three months.
my ($sec, $min, $hour, $mday, $mon, $year) = localtime();
my $rule_start_date =
sprintf("%d%02d%02d", ($year + 1900), ($mon + 1), $mday);
($sec, $min, $hour, $mday, $mon, $year) =
localtime(time + 60 * 60 * 24 * 30 * 3);
my $rule_end_date = sprintf("%d%02d%02d", ($year + 1900), ($mon + 1), $mday);
my $start_date_date_rule_item =
Google::Ads::AdWords::v201705::DateRuleItem->new({
key =>
Google::Ads::AdWords::v201705::DateKey->new({name => "checkoutdate"}),
op => "AFTER",
value => $rule_start_date
});
my $start_date_rule_item = Google::Ads::AdWords::v201705::RuleItem->new(
{DateRuleItem => $start_date_date_rule_item});
my $end_date_date_rule_item =
Google::Ads::AdWords::v201705::DateRuleItem->new({
key =>
Google::Ads::AdWords::v201705::DateKey->new({name => "checkoutdate"}),
op => "BEFORE",
value => $rule_end_date
});
my $end_date_rule_item = Google::Ads::AdWords::v201705::RuleItem->new(
{DateRuleItem => $end_date_date_rule_item});
# Combine the date rule items into a RuleItemGroup.
my $checked_out_next_three_months_item_group =
Google::Ads::AdWords::v201705::RuleItemGroup->new(
{items => [$start_date_rule_item, $end_date_rule_item]});
# Combine the rule item groups into a Rule so AdWords knows how to apply the
# rules.
my $rule = Google::Ads::AdWords::v201705::Rule->new({
groups => [
$checkout_multiple_item_group, $checked_out_next_three_months_item_group
],
# ExpressionRuleUserLists can use either CNF or DNF for matching. CNF
# means 'at least one item in each rule item group must match', and DNF
# means 'at least one entire rule item group must match'.
# DateSpecificRuleUserList only supports DNF. You can also omit the rule
# type altogether to default to DNF.
ruleType => 'DNF'
});
# Create the user list with no restrictions on site visit date.
($sec, $min, $hour, $mday, $mon, $year) = localtime();
my $creation_time = sprintf(
"%d%02d%02d_%02d%02d%02d",
($year + 1900),
($mon + 1),
$mday, $hour, $min, $sec
);
my $expression_user_list =
Google::Ads::AdWords::v201705::ExpressionRuleUserList->new({
name => "Expression based user list created at ${creation_time}",
description => "Users who checked out in six month window OR " .
"visited the checkout page with more than one item in their cart",
rule => $rule,
# Optional: Set the prepopulationStatus to REQUESTED to include past
# users in the user list.
prepopulationStatus => "REQUESTED"
});
# Create the user list restricted to users who visit your site within the
# next six months.
($sec, $min, $hour, $mday, $mon, $year) = localtime();
my $list_start_date =
sprintf("%d%02d%02d", ($year + 1900), ($mon + 1), $mday);
($sec, $min, $hour, $mday, $mon, $year) =
localtime(time + 60 * 60 * 24 * 30 * 6);
my $list_end_date = sprintf("%d%02d%02d", ($year + 1900), ($mon + 1), $mday);
my $date_user_list =
Google::Ads::AdWords::v201705::DateSpecificRuleUserList->new({
name => "Date rule user list created at ${creation_time}",
description => "Users who visited the site between " .
"${list_start_date} and ${list_end_date} and checked out " .
"in three month window OR visited the checkout page with " .
"more than one item in their cart.",
rule => $rule,
startDate => $list_start_date,
endDate => $list_end_date
});
# Create operations to add the user lists.
my $operations = [
Google::Ads::AdWords::v201705::UserListOperation->new({
operator => "ADD",
operand => $expression_user_list
}
),
Google::Ads::AdWords::v201705::UserListOperation->new({
operator => "ADD",
operand => $date_user_list
})];
# Submit the operations.
my $result =
$client->AdwordsUserListService()->mutate({operations => $operations});
if ($result->get_value()) {
foreach my $user_list (@{$result->get_value}) {
printf "User list added with ID %d, name '%s', status '%s', list " .
"type '%s', accountUserListStatus '%s', description '%s'.\n",
$user_list->get_id(), $user_list->get_name(),
$user_list->get_status(), $user_list->get_listType(),
$user_list->get_accountUserListStatus(),
$user_list->get_description();
}
} else {
print "No user list was added.";
}
return 1;
}
# Don't run the example if the file is being included.
if (abs_path($0) ne abs_path(__FILE__)) {
return 1;
}
# Log SOAP XML request, response and API errors.
Google::Ads::AdWords::Logging::enable_all_logging();
# Get AdWords Client, credentials will be read from ~/adwords.properties.
my $client = Google::Ads::AdWords::Client->new({version => "v201705"});
# By default examples are set to die on any server returned fault.
$client->set_die_on_faults(1);
# Call the example
add_rule_based_user_lists($client);
Upload offline conversions
#!/usr/bin/perl -w
#
# Copyright 2017, Google Inc. All Rights Reserved.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
# This code example imports offline call conversion values for calls to
# your account. To get Google Click ID for a click, run
# CLICK_PERFORMANCE_REPORT. To set up a conversion tracker, run the
# add_conversion_tracker.pl example.
use strict;
use lib "../../../lib";
use utf8;
use Google::Ads::AdWords::Client;
use Google::Ads::AdWords::Logging;
use Google::Ads::AdWords::v201705::UploadConversion;
use Google::Ads::AdWords::v201705::ConversionTrackerOperation;
use Google::Ads::AdWords::v201705::OfflineCallConversionFeed;
use Google::Ads::AdWords::v201705::OfflineCallConversionFeedOperation;
use Cwd qw(abs_path);
use Data::Uniqid qw(uniqid);
# Replace with valid values of your account.
my $conversion_name = "INSERT_CONVERSION_NAME_HERE";
my $gclid = "INSERT_GCLID_HERE";
my $conversion_time = "INSERT_CONVERSION_TIME_HERE";
my $conversion_value = "INSERT_CONVERSION_VALUE_HERE";
# Example main subroutine.
sub upload_offline_conversions {
my $client = shift;
my $conversion_name = shift;
my $gclid = shift;
my $conversion_time = shift;
my $conversion_value = shift;
my @offline_conversion_operations = ();
# Associate offline conversions with the existing named conversion tracker. If
# this tracker was newly created, it may be a few hours before it can accept
# conversions.
my $feed = Google::Ads::AdWords::v201705::OfflineCallConversionFeed->new({
conversionName => $conversion_name,
conversionTime => $conversion_time,
conversionValue => $conversion_value,
googleClickId => $gclid
});
my $offline_conversion_operation =
Google::Ads::AdWords::v201705::OfflineCallConversionFeedOperation->new({
operator => "ADD",
operand => $feed
});
push @offline_conversion_operations, $offline_conversion_operation;
# Add the upload conversion.
my $feed_result =
$client->OfflineCallConversionFeedService()
->mutate({operations => \@offline_conversion_operations});
# Display results.
if ($feed_result->get_value()) {
foreach my $oc_feed (@{$feed_result->get_value()}) {
printf "Uploaded offline conversion value of \"%s\" for Google Click " .
"ID \"%s\" was created.\n",
$oc_feed->get_conversionName(),
$oc_feed->get_googleClickId();
}
} else {
print "No offline conversion were added.\n";
return;
}
return 1;
}
# Don't run the example if the file is being included.
if (abs_path($0) ne abs_path(__FILE__)) {
return 1;
}
# Log SOAP XML request, response and API errors.
Google::Ads::AdWords::Logging::enable_all_logging();
# Get AdWords Client, credentials will be read from ~/adwords.properties.
my $client = Google::Ads::AdWords::Client->new({version => "v201705"});
# By default examples are set to die on any server returned fault.
$client->set_die_on_faults(1);
# Call the example
upload_offline_conversions($client, $conversion_name, $gclid, $conversion_time,
$conversion_value);
Upload offline call conversions
#!/usr/bin/perl -w
#
# Copyright 2017, Google Inc. All Rights Reserved.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
# This code example imports offline call conversion values for calls
# related to the ads in your account. To set up a conversion tracker, run the
# add_conversion_tracker.pl example using UploadCallConversion as the
# conversion tracker.
use strict;
use lib "../../../lib";
use utf8;
use Google::Ads::AdWords::Client;
use Google::Ads::AdWords::Logging;
use Google::Ads::AdWords::v201705::OfflineCallConversionFeed;
use Google::Ads::AdWords::v201705::OfflineCallConversionFeedOperation;
use Cwd qw(abs_path);
use Data::Uniqid qw(uniqid);
# Replace with valid values of your account.
my $caller_id = "INSERT_CALLER_ID_HERE";
# For times use the format yyyyMMdd HHmmss tz. For more details on formats,
# see: https://developers.google.com/adwords/api/docs/appendix/codes-formats#date-and-time-formats
# For time zones, see: https://developers.google.com/adwords/api/docs/appendix/codes-formats#timezone-ids
my $call_start_time = "INSERT_CALL_START_TIME_HERE";
my $conversion_name = "INSERT_CONVERSION_NAME_HERE";
my $conversion_time = "INSERT_CONVERSION_TIME_HERE";
my $conversion_value = "INSERT_CONVERSION_VALUE_HERE";
# Example main subroutine.
sub upload_offline_call_conversions {
my $client = shift;
my $caller_id = shift;
my $call_start_time = shift;
my $conversion_name = shift;
my $conversion_time = shift;
my $conversion_value = shift;
my @offline_call_conversion_operations = ();
# Associate offline call conversions with the existing named
# conversion tracker. If this tracker was newly created, it may be a
# few hours before it can accept conversions.
my $feed = Google::Ads::AdWords::v201705::OfflineCallConversionFeed->new({
callerId => $caller_id,
callStartTime => $call_start_time,
conversionName => $conversion_name,
conversionTime => $conversion_time,
conversionValue => $conversion_value
});
my $offline_call_conversion_operation =
Google::Ads::AdWords::v201705::OfflineCallConversionFeedOperation->new({
operator => "ADD",
operand => $feed
});
push @offline_call_conversion_operations, $offline_call_conversion_operation;
# This example uploads only one call conversion, but you can upload multiple
# call conversions by passing additional operations.
my $result =
$client->OfflineCallConversionFeedService()
->mutate({operations => \@offline_call_conversion_operations});
# Display results.
if ($result->get_value()) {
foreach my $feed_result (@{$result->get_value()}) {
printf "Uploaded offline call conversion value of \"%s\" for caller ID " .
"\"%s\".\n",
$feed_result->get_conversionValue(),
$feed_result->get_callerId();
}
} else {
print "No offline call conversions were added.\n";
return;
}
return 1;
}
# Don't run the example if the file is being included.
if (abs_path($0) ne abs_path(__FILE__)) {
return 1;
}
# Log SOAP XML request, response and API errors.
Google::Ads::AdWords::Logging::enable_all_logging();
# Get AdWords Client, credentials will be read from ~/adwords.properties.
my $client = Google::Ads::AdWords::Client->new({version => "v201705"});
# By default examples are set to die on any server returned fault.
$client->set_die_on_faults(1);
# Call the example
upload_offline_call_conversions($client, $caller_id, $call_start_time,
$conversion_name, $conversion_time, $conversion_value);
Need help? Visit our