use strict;
use warnings;

$queryhandle->bind_colums(undef, \my $id, \my $vegetable, \my $price etc....);