Add forked Maatkit tools in bin/ and their tests in t/.

t/pt-query-advisor/ignore_rules.t

@@ -0,0 +1,33 @@
+#!/usr/bin/env perl
+
+BEGIN {
+   die "The PERCONA_TOOLKIT_BRANCH environment variable is not set.\n"
+      unless $ENV{PERCONA_TOOLKIT_BRANCH} && -d $ENV{PERCONA_TOOLKIT_BRANCH};
+   unshift @INC, "$ENV{PERCONA_TOOLKIT_BRANCH}/lib";
+};
+
+use strict;
+use warnings FATAL => 'all';
+use English qw(-no_match_vars);
+use Test::More tests => 1;
+
+use MaatkitTest;
+shift @INC;  # These two shifts are required for tools that use base and
+shift @INC;  # derived classes.  See mk-query-digest/t/101_slowlog_analyses.t
+require "$trunk/bin/pt-query-advisor";
+
+my @args = qw(--print-all --report-format full --group-by none);
+
+ok(
+   no_diff(sub { mk_query_advisor::main(@args,
+         qw(--ignore-rules COL.001),
+         '--query', 'SELECT * FROM tbl WHERE id=1') },
+      't/pt-query-advisor/samples/tbl-001-01-ignored.txt',
+   ),
+   'Ignore a rule'
+);
+
+# #############################################################################
+# Done.
+# #############################################################################
+exit;