#@ UPDATE_CART
sub update_cart
{
my ($cart_ref, $item_id, $qty) = @_;

    update ($cart_ref->{$item_id}->{qty} = $qty);
}
#@ UPDATE_CART

##</code><code>##

update(2);