I finally decided to get back to work on my commerce site conversion from ASP to mod_perl. Almost right away, I decided that using Class::DBI was not only sane, but a real time saver. The last thing I want to do is spend my time writing data layer calls and code.

After re-reading the articles on Perl.com and trading some emails with Tony Bowden about Class::DBI, I’ve come to the acceptance (with his helpful suggestion) that they way most of us ecom people do shopping carts is wrong from a database schema perspective.

Consider the following schema:

  • cart

    • item_id
    • shopper_id
    • sku
    • quantity
    • price

From the perspective of mapping objects to database data, we have a cart table containing cart item rows. This could be mapped to a Cart object that contains a collection of Cart Items. Sounds good, until I started using Class::DBI.

Once I created a Cart object, and mapped it to the cart table, it was clear to me that Class::DBI would return individual Cart objects, not Cart::Item objects. Sure, I can rename the base cart class Cart::Item instead, but symantically, it doesn’t fit. A Cart Item object should be creating new cart item objects, nor loading the entire cart contents. This issue is made more true if I wanted to save or label shopping carts and their contents.

What to do? Do what I should’ve always done, but never did out of habit: make a cart table and a cart_items table.

  • cart

    • cart_id
    • shopper_id
    • cart_type
    • name
  • cart_items

    • item_id
    • cart_id
    • sku
    • quantity
    • price

Not only does this make more sense, it also means that Class::DBI will yield more sane objects via the has_many method.

Now, on to my second cart issue: item_id.

I’ve seen many a shopping cart tables where the item_id , or the row identifier for shopping cart items are AUTO_INCRIMENT integers. This drives me nutty. It’s a built in limitation. As some point in the future, the number of items added will reach it’s maximum number allow for the integer type, then kaboom. Why build in that limitation?

Personally, I always use unique identifiers (UUID) for each item id instead of integers. Of course, I could be smoking crack.

See more posts about: perl | All Categories