use DBI;
my $dbh = DBI->connect("DBI:mysql:$dbase", $mysql_user, $mysql_pass) or
print DBI->errstr;

  my $data = qq(INSERT INTO searches (search, engine, time) values(?,?,?));
  my $sth = $dbh->prepare($data);
  $sth->execute("$search", "$engine", NOW());