minivend( or interchange ) is a great cart.

it has a pretty steep learning curve, but it'll do whatever you want.

you can get it off CPAN: Bundle::Minivend, too

--jj--