Merge lp:~percona-toolkit-dev/percona-toolkit/fix-pt-agent-lwp-bug-1226721 into lp:~percona-toolkit-dev/percona-toolkit/release-2.2.5

[Daniel Nichter]

[Daniel Nichter (daniel-nichter)]

review: Approve

=== modified file 'bin/pt-agent'
--- bin/pt-agent	2013-08-08 19:28:36 +0000
+++ bin/pt-agent	2013-09-17 17:46:05 +0000
@@ -5428,6 +5428,12 @@
       $logger->fatal("Missing required Perl modules");
    }
 
+   # Check that LWP is new enough
+   # https://bugs.launchpad.net/percona-toolkit/+bug/1226721
+   if ( $LWP::VERSION < '5.813' ) {
+      die "Perl module LWP v5.813 or newer is required; v$LWP::VERSION is installed.  Please upgrade LWP on this server.\n"
+   }
+
    # ########################################################################
    # Nothing works without an API key.
    # ########################################################################
@@ -8341,6 +8347,12 @@
    $next_step->();
    exit 1 if missing_perl_module_deps();
 
+   # Check that LWP is new enough
+   # https://bugs.launchpad.net/percona-toolkit/+bug/1226721
+   if ( $LWP::VERSION < '5.813' ) {
+      die "LWP v5.813 or newer is required; v$LWP::VERSION is installed.  Please upgrade LWP on this server and try again.\n"
+   }
+
    # Check for crontab
    $next_step->();
    my $crontab = `which crontab 2>/dev/null`;
@@ -9310,7 +9322,7 @@
 
 =item * JSON Perl module
 
-=item * LWP Perl module
+=item * LWP (>= v5.813) Perl module
 
 =item * IO::Socket::SSL Perl module