this is how i am doing it: use CGI qw(:standard); use DBI; use dbUtil;
$db_name = param('db_create'); # however you want to get the db name to create $drh = DBI->install_driver('mysql') or die "couldn't install driver"; $drh->func('createdb', "$db_name", '','','', 'admin') or die "couldn't create database $db_name"; On Tuesday, March 19, 2002, at 02:20 PM, James Taylor wrote: > CPAN is running exremely slow (as per usual) and I just have a quick > question. How do I CREATE a database from within perl with MySQL? > Generally > the first command you give for DBI will be a statement to connect to a db, > but what if I have to have the db created first? > > This is for a script that will automate the installation of a set of 12 > scripts, and sets up 6 tables, and I don't want to have to tell users to > first have to run mysql, type in "create database blah", quit, and then > run > the script. > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]