sub cart_preview_conditional_element {                                                                      
        my ($key, $value) = @_;                                                                             
        if (!($key && $value)) { return; }
 
        print qq{
                <b>${key}:</b> $value <br/>";
        }
}
 
sub cart_preview_conditional_selection {
        my ($key, $value) = @_;
        if (!($key && $value)) { return; }
 
        my @options = split(/\n/,$value);
        print qq{
                <b>$key</b>:
                <select name="$key">
        };
        for (@options) {
                print qq{
                        <option value="$_">$_</option>
                };
        }
        print qq{ </select> };
}
 
# Takes database handle and cart item ID
sub cart_previewitem {
        my ($dbh, $id) = @_;

        if ($id !~ /^\d+$/) { die "Invalid ID (not a number)"; }

        my $sth = $dbh->prepare("select * from items where id='?'");
        $sth->execute($id) || die $dbh->errstr;

        my $row = $sth->fetchrow_hashref() || die "No such item";

        print qq{
                <div class="item_preview">
                        <h2>$row->{'product'} - $row->{'title'}</h2>
        };

        if ($row->{'image'}) {
                print qq{
                        <div class="item_preview_image">
                                <img src="$row->{'image'}"/>
                        </div>
                };
        }
         
        print qq{ <div class="item_preview_details"> };

        cart_preview_conditional_element("Description",$row->{'description'});
        cart_preview_conditional_element("Size",$row->{'size'});
        cart_preview_conditional_element($row->{'misc_key_1'},$row->{'misc_value_1'});
        cart_preview_conditional_element($row->{'misc_key_2'},$row->{'misc_value_2'});

        print qq{ </div> };

        cart_preview_conditional_selector($row->{'selection_name_1'}, $row->{'selection_values_1'});
        cart_preview_conditional_selector($row->{'selection_name_2'}, $row->{'selection_values_2'});

        print qq{ </div> };

};