File: //proc/self/root/scripts.20110531.215904.25158/dropmysqldb
#!/usr/bin/perl
# cpanel - dropmysqldb Copyright(c) 2010 cPanel, Inc.
# All rights Reserved.
# copyright@cpanel.net http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited
BEGIN { unshift @INC, '/usr/local/cpanel'; }
use strict;
use Cpanel::MysqlUtils ();
use Cpanel::DB::Map::Collection ();
my $db = shift @ARGV;
my $mysqladmin = Cpanel::MysqlUtils::find_mysqladmin();
if ( !$db ) {
print "You must give a database as an argument\n";
exit;
}
if ( open( my $mysqladmin_h, '|-', $mysqladmin, '-u', 'root', 'drop', $db ) ) {
print {$mysqladmin_h} 'y';
close($mysqladmin_h);
}
$db =~ s/_/\\_/g;
Cpanel::MysqlUtils::sqlcmd("DELETE FROM mysql.db WHERE Db = '$db';");
Cpanel::MysqlUtils::sqlcmd("FLUSH PRIVILEGES;");
my $maps = Cpanel::DB::Map::Collection->new( { db => 'MYSQL' } );
my $map = $maps->find_by_db($db);
my $owner = $map->get_owner();
$owner->remove_db($db);
$map->save();