Help for this page
my $mb = new MySQL::Backup($database,$host,$user,$pwd,{'USE_REPLACE' = +> 0, 'SHOW_TABLE_NAMES' => 0}); $mb->create_structure(); ... else { exit 1; }
if (my $mb = new MySQL::Backup($database,$host,$user,$pwd,{'USE_REPLAC +E' => 0, 'SHOW_TABLE_NAMES' => 0})) { my $file = join '', 'db.backup.', time, '.sql'; ... else { die "Can't connect to database!"; }