~percona-toolkit-dev/percona-toolkit/manual-for-pt-query-digest--type-binlog-is-ambiguous-1377888

« back to all changes in this revision

Viewing changes to lib/BinaryLogParser.pm

  • Committer: Frank Cizmich
  • Date: 2014-07-29 15:51:01 UTC
  • mfrom: (606.1.12 release-2.2.9)
  • Revision ID: frank.cizmich@percona.com-20140729155101-f5kv4rmeu3s5rzk5
mergedĀ releaseĀ 2.2.9

Show diffs side-by-side

added added

removed removed

Lines of Context:
33
33
$Data::Dumper::Quotekeys = 0;
34
34
 
35
35
my $binlog_line_1 = qr/at (\d+)$/m;
36
 
my $binlog_line_2 = qr/^#(\d{6}\s+\d{1,2}:\d\d:\d\d)\s+server\s+id\s+(\d+)\s+end_log_pos\s+(\d+)\s+(\S+)\s*([^\n]*)$/m;
 
36
my $binlog_line_2 = qr/^#(\d{6}\s+\d{1,2}:\d\d:\d\d)\s+server\s+id\s+(\d+)\s+end_log_pos\s+(\d+)\s+(?:CRC32\s+0x[a-f0-9]{8}\s+)?(\S+)\s*([^\n]*)$/m;
37
37
my $binlog_line_2_rest = qr/thread_id=(\d+)\s+exec_time=(\d+)\s+error_code=(\d+)/m;
38
38
 
39
39
# Sub: new