Remove _d from Percona::Toolkit because I can't get it to export correctly. Put Percona::Toolkit in most tools.

bin/pt-upgrade

@@ -6,7 +6,61 @@
 
 use strict;
 use warnings FATAL => 'all';
-use constant PTDEBUG => $ENV{PTDEBUG} || 0;
+
+# This tool is "fat-packed": most of its dependent modules are embedded
+# in this file.  Setting %INC to this file for each module makes Perl aware
+# of this so it will not try to load the module from @INC.  See the tool's
+# documentation for a full list of dependencies.
+BEGIN {
+   $INC{$_} = __FILE__ for map { (my $pkg = "$_.pm") =~ s!::!/!g; $pkg } (qw(
+      Percona::Toolkit
+      DSNParser
+      TableParser
+      Quoter
+      OptionParser
+      Transformers
+      SlowLogParser
+      EventAggregator
+      QueryParser
+      QueryRewriter
+      Daemon
+      ChangeHandler
+      RowDiff
+      TableChunker
+      TableNibbler
+      TableChecksum
+      TableSyncer
+      TableSyncChunk
+      TableSyncNibble
+      TableSyncGroupBy
+      Outfile
+      MockSyncStream
+      MockSth
+      ReportFormatter
+      UpgradeReportFormatter
+      CompareResults
+      CompareQueryTimes
+      CompareWarnings
+      Retry
+   ));
+}
+
+# ###########################################################################
+# Percona::Toolkit package
+# This package is a copy without comments from the original.  The original
+# with comments and its test file can be found in the Bazaar repository at,
+#   lib/Percona/Toolkit.pm
+#   t/lib/Percona/Toolkit.t
+# See https://launchpad.net/percona-toolkit for more information.
+# ###########################################################################
+{
+package Percona::Toolkit;
+our $VERSION = '2.1.3';
+1;
+}
+# ###########################################################################
+# End Percona::Toolkit package
+# ###########################################################################
 
 # ###########################################################################
 # DSNParser package
@@ -10295,6 +10349,7 @@ $Data::Dumper::Quotekeys = 0;
 
 Transformers->import(qw(make_checksum));
 
+use Percona::Toolkit;
 use constant PTDEBUG => $ENV{PTDEBUG} || 0;
 
 use sigtrap 'handler', \&sig_int, 'normal-signals';