Return to cleanup_database.pl CVS log | Up to [LON-CAPA] / loncom / metadata_database |
version 1.5, 2006/08/10 20:07:01 | version 1.6, 2006/08/21 21:30:02 |
---|---|
Line 132 foreach my $name (keys(%$results)) { | Line 132 foreach my $name (keys(%$results)) { |
$dbh->do('DROP TABLE '.$name); | $dbh->do('DROP TABLE '.$name); |
} | } |
} | } |
$sth->finish(); | |
# --------------------------------------------------- Close database connection | # --------------------------------------------------- Close database connection |
$dbh->disconnect; | $dbh->disconnect; |