~bisscuitt/percona-toolkit/lsof_find

« back to all changes in this revision

Viewing changes to lib/Sandbox.pm

  • Committer: Frank Cizmich
  • Date: 2014-10-13 16:33:32 UTC
  • mfrom: (608.1.20 release-2.2.11)
  • Revision ID: frank.cizmich@percona.com-20141013163332-oiybgd5ae58bubqy
merged release-2.2.11

Show diffs side-by-side

added added

removed removed

Lines of Context:
374
374
           . join(", ", map { "mysql.$_" } @tables_in_mysql)
375
375
           . ", "
376
376
           . join(", ", map { "sakila.$_" } @tables_in_sakila);
 
377
 
 
378
   # remove leading "," if any
 
379
   $sql =~ s/CHECKSUM TABLES\s+,/CHECKSUM TABLES /;
 
380
 
377
381
   my @checksums = @{$dbh->selectall_arrayref($sql, {Slice => {} })};
378
382
 
379
383
   # Diff the two sets of checksums: host to master (ref).