Script til restore
Hej,Jeg har følgende script der tager backup af MySQL databaserne på en webserver.
#!/usr/bin/perl
### Configuration
$dbhost="localhost";
$username="username";
$password="password";
$mysql_backup_dir="/backup/mysql";
$options="--compatible=mysql323 --compress --default-character-set=cp1251 --set-charset=cp1251 ";
### Do not modify below this line
use DBI;
my $DATABASE="mysql";
$DSN = "DBI:mysql:$DATABASE:$dbhost";
$DBH = DBI->connect($DSN, $username, $password);
my @db_names = $DBH->func('_ListDBs');
$DBH->disconnect;
chdir($mysql_backup_dir);
foreach $item (@db_names) {
if (-e "$item.sql.gz") { unlink "$item.sql.gz"; }
`mysqldump -u $username -p$password $options $item > $item.sql `;
`gzip $item.sql`;
}
Er der nogen herinde der kan 'vende' scriptet, så det kan restore til serveren?
Hvad betyder/gør følgende linie:
if (-e "$item.sql.gz") { unlink "$item.sql.gz"; }
På forhånd tak!