mirror of
https://github.com/percona/percona-toolkit.git
synced 2025-09-16 16:23:30 +00:00
Removed indirect object syntax from MySQLProtocolParser.pm
This commit is contained in:
@@ -1369,7 +1369,7 @@ sub uncompress_data {
|
|||||||
|
|
||||||
# Uncompress the compressed binary data.
|
# Uncompress the compressed binary data.
|
||||||
my $uncomp_bin_data = '';
|
my $uncomp_bin_data = '';
|
||||||
my $z = new IO::Uncompress::Inflate(
|
my $z = IO::Uncompress::Inflate->new(
|
||||||
\$comp_bin_data
|
\$comp_bin_data
|
||||||
) or die "IO::Uncompress::Inflate failed: $InflateError";
|
) or die "IO::Uncompress::Inflate failed: $InflateError";
|
||||||
my $status = $z->read(\$uncomp_bin_data, $len)
|
my $status = $z->read(\$uncomp_bin_data, $len)
|
||||||
|
Reference in New Issue
Block a user