title: DBI syntax error using "DROP TABLE IF EXISTS"
body: <p>I'm starting in the world of databases. I'm trying to make a Perl script to get some data from a database in SQLite3. The first step I want to do is remove a existing table and then create another with new data. My code is: </p>
  
  <pre><code>#!/usr/bin/perl
  
  use DBI;
  use strict;
  
  my $driver   = "SQLite"; 
  my $database = "/media/My\ Passport/Sources/M5nr_db";
  my $dsn = "DBI:$driver:dbname=$database";
  my $userid = "";
  my $password = "";
  my $dbh = DBI-&gt;connect($dsn, $userid, $password, { RaiseError =&gt; 1 }) 
                        or die $DBI::errstr;
  
  print "Opened database successfully\n";
  my $stmt = qq(DROP TABLE IF EXISTS matching_prot );
  my $rv = $dbh-&gt;do($stmt);
  my $stmt = qq(CREATE TABLE matching_prot
      (Seq_ID TEXT,
       M5 TEXT,
       Identity REAL
       Evalue REAL
       Bit_score INT););
  my $rv = $dbh-&gt;do($stmt);
  
  $dbh-&gt;disconnect();
  </code></pre>
  
  <p>But I get the following error: </p>
  
  <pre><code>Opened database successfully
  DBD::SQLite::db do failed: near "EXISTS": syntax error(1) at dbdimp.c line 269 at use_database.pl line 16.
  DBD::SQLite::db do failed: near "EXISTS": syntax error(1) at dbdimp.c line 269 at use_database.pl line 16.
  </code></pre>
  
  <p>In the sqlite3 command-line it works fine. Any ideas?</p>
  
  <p>Well, thanks in advance. </p>