my $sth=$dbh->prepare('CREATE DATABASE IF NOT EXISTS foo');
$sth->execute();