![]() |
![]()
| ![]() |
![]()
NAMEGoogle::Checkout::General::DigitalContent SYNOPSISuse Google::Checkout::General::GCO; use Google::Checkout::General::ShoppingCart; use Google::Checkout::General::MerchantItem; use Google::Checkout::General::DigitalContent; use Google::Checkout::General::Util qw/is_gco_error/; 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); my $cart = Google::Checkout::General::ShoppingCart->new( expiration => "+1 month", private => "Private data", checkout_flow => $checkout_flow); my $item1 = Google::Checkout::General::MerchantItem->new( name => "Test item 1", description => "Test description 1", price => 12.34, quantity => 12, private => "Item #1", tax_table_selector => "item"); #-- #-- Same as MerchantItem except this is for digital delivery #-- my $item2 = Google::Checkout::General::DigitalContent->new( name => "Digital Content", description => "For digital delivery", price => 19.99, quantity => 1, delivery_method => Google::Checkout::General::DigitalContent::EMAIL_DELIVERY ); my $item3 = Google::Checkout::General::DigitalContent->new( name => $item2->get_name, description => $item2->get_description, price => $item2->get_price, quantity => 1, delivery_method => Google::Checkout::General::DigitalContent::KEY_URL_DELIVERY, download_instruction => "Use key to login and URL to download.", key => "12345", url => "http://abc/download" ); $cart->add_item($item1); $cart->add_item($item2); $cart->add_item($item3); my $response = Google::Checkout::General::GCO->new->checkout($cart); die $response if is_gco_error($response); #-- #-- redirect URL #-- print $response,"\n"; DESCRIPTIONSubclass of "Google::Checkout::General::MerchantItem" used for digital delivery.
COPYRIGHTCopyright 2006 Google. All rights reserved. SEE ALSOGoogle::Checkout::General::MerchantItem
|