Help for this page
for my $i(0..$#databases) { my $host = $databases[$i][0]; my $database = $databases[$i][1];
#!/usr/bin/perl ... close OUTPUT; print "Completed!\n";