Sanjeev Sagar wrote:
Hello All,
I am trying to create a perl DBI/DBD script for creating a database initial build. My input is a extract file, which is a mysqldump result file with --opt and -B option.
I am using DBIx::DWIW. I am able to open a successful database handler. I am having
code like
my $dropsql=DROP DATABASE $ARGV[1];
my $loadsql=source /tmp/extract-file-name;
Source is a command built into the mysql client program, not the server.
You will have to write a perl subroutine that accomplishes the same task.
You may use 'system' to run the mysql client.
print Running database load...\n;
$conn-Execute($dropsql);
RC=$?
die Error running in $dropsql...\n if ( RC != 0 );
$conn-Execute($loadsql);
RC=$?
die Error in running $loadsql...\n if (RC != 0);
It appears that $loadsql is not going through. It is able to drop database but not running
source command at all. I have tried by using \. extract-file-name, still no luck.
Looks to me that I am not doing it right way. Any help will be highly appreciated.
Regards,
--
MySQL General Mailing List
For list archives: http://lists.mysql.com/mysql
To unsubscribe:http://lists.mysql.com/[EMAIL PROTECTED]
