sub get_product_table
{
my $sth = shift;
my @row;

      		
	
	while (my $ref = $sth->fetchrow_hashref ())
	{
my $serve_url = sprintf ("serve_image.cgi?item_id=%s",
								escape ($ref->{item_id}));
		

# generate a form allowing a quantity of the item to be added
# to the cart
push (@row, start_form(-method=>'GET', -action=>url()),
hidden( -name => "choice", -override => 1, 
-default => "add" ),
hidden( -name => "item_id", -override => 1, 
-default => escapeHTML( $ref->{item_id} )),
        Tr (
   print img ({-src => "$serve_url;thumbnail=1", -alt => $ref->item_id}), 
   td ( escapeHTML( $ref->{item_id} )),