Add back PerconaTest::slurp_file(). Put in scope in pt-index-usage. Sort MySQL instance IDs for testing. Wait for pid file in pt-heartbeat/basics.t.

This commit is contained in:
Daniel Nichter
2012-08-28 15:28:34 -06:00
parent 8afb9ea5ff
commit a3950411b9
5 changed files with 14 additions and 7 deletions

View File

@@ -213,7 +213,13 @@ sub load_file {
return $contents;
}
sub slurp_file { Percona::Toolkit::slurp_file(@_) }
sub slurp_file {
my ($file) = @_;
open my $fh, "<", $file or die "Cannot open $file: $OS_ERROR";
my $contents = do { local $/ = undef; <$fh> };
close $fh;
return $contents;
}
sub parse_file {
my ( $file, $p, $ea ) = @_;