|
NAMEGoogle::Checkout::General::ParameterizedUrl SYNOPSIS use Google::Checkout::General::GCO;
use Google::Checkout::General::ShoppingCart;
use Google::Checkout::General::ParameterizedUrl;
use Google::Checkout::General::MerchantCheckoutFlow;
use Google::Checkout::General::Util qw/is_gco_error/;
my $purls = Google::Checkout::General::ParameterizedUrl->new(
url => 'http://www.yourcompany.com', #-- Must be properly URI escaped
url_params => {key1 => 'value1', key2 => 'value2', key3 => 'value3'});
my $checkout_flow = Google::Checkout::General::MerchantCheckoutFlow->new(
shipping_method => [$method],
edit_cart_url => "http://edit/cart/url",
continue_shopping_url => "http://continue/shopping/url",
buyer_phone => "1-111-111-1111",
tax_table => [$table1, $table2],
merchant_calculation => $merchant_calculation,
analytics_data => "SW5zZXJ0IDxhbmFseXRpY3MtZGF0YT4gdmFsdWUgaGVyZS4=",
parameterized_urls => [$purl1, $purl2]);
my $cart = Google::Checkout::General::ShoppingCart->new(
expiration => "+1 month",
private => "Private data",
checkout_flow => $checkout_flow);
$cart->add_item($item1);
$cart->add_item($item2);
my $response = Google::Checkout::General::GCO->new->checkout($cart);
die $response if is_gco_error($response);
#--
#-- redirect URL
#--
print $response,"\n";
DESCRIPTIONThis module is responsible for supporting parameterized tracking URL.
COPYRIGHTCopyright 2006 Google. All rights reserved. SEE ALSOGoogle::Checkout::General::MerchantCheckoutFlow
|