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;thumbnail", 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 (
   td (print img ({-src => $serve_url, -alt => escapeHTML($ref->{item_id})})),