my $sql = qq| create table colors (
               color varchar(60) default NULL
 	       ) type=MyISAM;
	  |;
my $sth = $dbh->prepare($sql) or die "error." . $dbh->errstr;
$sth->execute() or die "error." . $dbh->errstr;