Select Code to Download

use DBI;
my $dbh = DBI->connect("DBI:enginename");
$dbh->do("CREATE DATABASE foo");
$dbh->do("CREATE TABLE foo.blah (id INT, data BLOB)");
# then proceed with inserting and selecting