my $stmt = qq{SELECT color_id FROM color WHERE color=?};\
my $color_id;
foreach my $color (@color){
  $color =~ s/^\s+|\s+$//gm;
  $color_id = $dbh->selectrow_array($stmt, undef, $color); 
}