Help for this page

Select Code to Download


  1. or download this
    my $mb = new MySQL::Backup($database,$host,$user,$pwd,{'USE_REPLACE' =
    +> 0, 'SHOW_TABLE_NAMES' => 0});
    $mb->create_structure();
    ...
    else {
      exit 1;
    }
    
  2. or download this
    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!";
    }