NAME

Mango::Cart - Module for maintaining shopping cart contents

SYNOPSIS

    my $cart = $provider->create({
        user => 23
    });
    
    $cart->add({
        sku      => 'SKU1234',
        quantity => 1,
        price    => 1.25
    });
    
    my $iterator = $cart->items;
    while (my $item = $iterator->next) {
        print $item->sku;
        print $item->price;
        print $item->total;
    };
    $item->subtotal;

DESCRIPTION

Mango::Cart is component for maintaining simple shopping cart data.

METHODS

add

Arguments: \%data | $item

Adds a new item to the current shopping cart and returns an instance of the item class. You can either pass the item data as a hash reference:

    my $item = $cart->add({
        sku      => 'SKU1234',
        quantity => 1,
        price    => 1.25
    });

or pass an existing cart item:

    $cart->add(
        $wishlist->items({sku => 'ABC-123'})->first
    );

When passing an existing cart item to add, all columns in the source item will be copied into the destination item if the column exists in both the destination and source, and the column isn't the primary key or the foreign key of the item relationship.

clear

Deletes all items from the current cart.

    $cart->clear;

count

Returns the number of items in the cart object.

    my $numitems = $cart->count;

delete

Arguments: \%filter

Deletes the item matching the supplied filter from the current cart.

    $cart->delete({
        sku => 'ABC-123'
    });

destroy

Deletes the current item from the provider.

items

Arguments: \%filter [, \%options]

Loads the current carts items matching the specified filter and returns a Mango::Iterator in scalar context, or a list of items in list context.

    my $iterator = $cart->items;
    while (my $item = $iterator->next) {
        print $item->sku;
    };
    
    my @items = $cart->items;

The following options are available:

order_by

Order the items by the column(s) and order specified. This option uses the SQL style syntax:

    my $items = $cart->items(undef, {order_by => 'sku ASC'});

restore

Arguments: \%filter [, $mode]

Arguments: $cart [, $mode]

Copies (restores) items from a cart, or a set of carts back into the current shopping cart. You may either pass in a hash reference containing the search criteria of the shopping cart(s) to restore:

    $cart->restore({
        shopper => 'D597DEED-5B9F-11D1-8DD2-00AA004ABD5E',
        type    => CART_TYPE_SAVED
    });

or you can pass in an existing Mango::Cart object or subclass.

    my $wishlist = Mango::Cart->search({
        id   => 23,
        type => CART_TYPE_SAVED
    })->first;
    
    $cart->restore($wishlist);

For either method, you may also specify the mode in which the cart should be restored. The following modes are available:

CART_MODE_REPLACE

All items in the current cart will be deleted before the saved cart is restored into it. This is the default if no mode is specified.

CART_MODE_MERGE

If an item with the same SKU exists in both the current cart and the saved cart, the quantity of each will be added together and applied to the same sku in the current cart. Any price differences are ignored and we assume that the price in the current cart has the more up to date price.

CART_MODE_APPEND

All items in the saved cart will be appended to the list of items in the current cart. No effort will be made to merge items with the same SKU and duplicates will be ignored.

id

Returns the id of the current cart.

    print $cart->id;

subtotal

Returns the current total price of all the items in the cart object as a stringified Mango::Currency object. This is equivalent to:

    my $iterator = $cart->items;
    my $subtotal = 0;
    while (my $item = $iterator->next) {
        $subtotal += $item->quantity*$item->price;
    };

created

Returns the date the cart was created as a DateTime object.

    print $cart->created;

updated

Returns the date the cart was last updated as a DateTime object.

    print $cart->updated;

update

Saves any changes to the cart back to the provider.

SEE ALSO

Mango::Cart::Item, Mango::Schema::Cart

AUTHOR

    Christopher H. Laco
    CPAN ID: CLACO
    claco@chrislaco.com
    http://today.icantfocus.com/blog/

cpanm Mango

perl -MCPAN -e shell
install Mango