1 sub { #
2 my ($cgi, $session,$product,$tags,$itemID, $incomingdata);
3 my $incomingdata = $_[0]; 


#################
4 my  @partofcookie= ({name => 'abc1',quantity => 1},{name => 'abc2',quantity => 2});
5 #my  @partofcookie= ($incomingdata);

6 foreach my $product ( @partofcookie) {    ##test
7 $product->{prod_subtotal} = $product->{price} * $product->{quantity}; 
8 $tags->{total_price} += $product->{prod_subtotal}; 
9. $tags->{itemmaxtemp}=$itemmaxtemp;
10. $tags->{itemID}=$itemID;

11 push @{$tags->{cart_loop}}, $product; 
12 } 
13 my @xxx;
14 @xxx = @{$tags->{cart_loop}};
15   return { orderdetail_loop => \@xxx};
16  }