- or download this
$oDB_Comparison->compare(@tables);
- or download this
$oDB_Comparison->verbose;
- or download this
my $dbh1 = DBI->connect('DBI:DATABASE_TYPE:DATABASE_NAME:DATABASE_SERV
+ER','USERNAME','PASSWORD') || die "Error Connecting to \$dbh1: ".$DBI
+::errstr."\n";
- or download this
#!/usr/bin/perl
...
my @tables = ('Table1', 'Table2);
$oDB_Comparison->verbose;
$oDB_Comparison->compare(@tables);