Select Code to Download

#! perl -slw
use strict;
...
    <- DESTROY= undef at C:\test\sqltest.pl line 17 via  at C:\test\sq
+ltest.pl line 17
    -> DESTROY for DBD::SQLite::db (DBI::db=HASH(0x4054ca0)~INNER) thr
+#a8e58
    <- DESTROY= undef at C:\test\sqltest.pl line 17 via  at C:\test\sq
+ltest.pl line 17

c:\test>sqlite3 test.fasta.db
SQLite version 3.7.3
...

sqlite> select count(*) from fasta;
1058202