Commit 45e2cbc8 authored by Andreas Kusalananda Kähäri's avatar Andreas Kusalananda Kähäri
Browse files

Insert yet another progress message.

parent bcc1097c
......@@ -201,6 +201,8 @@ foreach my $dbh (@db_handles) {
$sth->bind_col( 1, \$dbname );
while ( $sth->fetch() ) {
printf( "##> Processing '%s'\n", $dbname );
foreach my $table (@tables) {
my $csth = $dbh->column_info( undef, $dbname, $table, '%' );
my $colinfo = $csth->fetchall_hashref( ['COLUMN_NAME'] );
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment