Vend::Cart(3pm)

Test header for item toss

 my $cart = [
        {
                code => 1,
                mv_mi => 1,
                mv_si => 0,
                mv_ci => 0,
                quantity => 0,
        },
        {
                code => 2,
                mv_mi => 1,
                mv_si => 1,
                mv_ci => 2,
                quantity => 1,
        },
        {
                code => 3,
                mv_mi => 2,
                mv_si => 1,
                mv_ci => 0,
                quantity => 1,
        },
        {
                code => 5,
                mv_mi => 1,
                mv_si => 1,
                mv_ci => 3,
                quantity => 1,
        },
        {
                code => 50,
                mv_mi => 3,
                mv_si => 1,
                mv_ci => 0,
                quantity => 1,
        },
        {
                code => 51,
                mv_mi => 3,
                mv_si => 1,
                mv_ci => 31,
                quantity => 1,
        },
        {
                code => 52,
                mv_mi => 31,
                mv_si => 1,
                mv_ci => 0,
                quantity => 1,
        },
        {
                code => 6,
                mv_mi => 1,
                mv_si => 1,
                mv_ci => 0,
                quantity => 1,
        },
        {
                code => 7,
                mv_mi => 0,
                mv_si => 0,
                mv_ci => 0,
                quantity => 1,
        },
];

Test footer for item toss

        toss_cart($cart);
        use Data::Dumper;
        $Data::Dumper::Indent = 2;
        $Data::Dumper::Terse = 2;
        print Data::Dumper::Dumper($cart);
        # ENDTEST

Releases

2 releases since Debian 6.0 (Squeeze); the text changed 1 time.

6.0
7